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Introduction 


Lorsque l’on évoque l’ Amstrad, on pense immédiatement à ses qua- 
lités les plus connues : qualité de la couleur et du graphisme, qualité 
des sons. Ces qualités, qui font le renom de ce micro-ordinateur, ne 
doivent pas faire oublier toutes les possibilités nouvelles qu’il offre : 
redéfinition graphique des caractères, fenêtres de texte, interrup- 
tions logicielles, gestion de la musique en temps réel, redéfinition du 
clavier, etc. Avec l’ Amstrad, la micro-informatique familiale et 
semi-professionnelle entre dans l’ère de l’informatique tout court. 
Elle lui emprunte ses instruments les plus puissants, et devient ainsi 
plus simple à utiliser car plus performante. 


Ce livre tente de faire un tour d’horizon des nouveautés introduites 
par l’ Amstrad. La première partie est consacrée à l’étude des ins- 
tructions du BASIC dans les domaines du graphisme, du son, des 
interruptions et du clavier. La seconde partie est une étude plus 
approfondie de l’ Amstrad : organisation de la mémoire, initiation 
au langage machine, liste de sous-programmes ‘‘machine”’. Enfin, 
dans la troisième partie, nous vous présentons une série de pro- 
grammes, jeux ou utilitaires spécifiques à l’ Amstrad. 


Chaque chapitre important est lui-même suivi d’un ou de deux pro- 
grammes offrant un exemple concret d’utilisation des instructions 
abordées. Ces programmes vous aideront aussi à tirer le meilleur 
parti de votre Amstrad : éditeur de caractère, bibliothèques d’enve- 
loppes de son et de tonalité, programme d’aide à la mise au point de 
programmes machine. 


Chapitre I 





Plein les yeux ! 


Trois décors : les modes d’affichage 


Un ordinateur présente généralement un seul mode d’affichage. 
L’écran est divisé en pixels, parties élémentaires de l’image les plus 
petites que l’ordinateur puisse contrôler. L’ordinateur réserve dans 
sa mémoire une zone mémoire écran dans laquelle il mémorise, pour 
chaque pixel, la couleur de ce pixel. 


C’est la taille de la mémoire réservée à l’écran qui détermine la qua- 
lité de l’image. Plus celle-ci est importante, plus un grand nombre de 
pixels peut être défini, et plus, pour chaque pixel, on peut choisir de 
couleurs. 


L'utilisateur de l’ Amstrad a le choix entre trois modes d’affichage. Il 
peut déterminer dans une certaine gamme la taille des pixels et le 
nombre de couleurs disponibles pour chaque pixel. 


Les trois modes 


Haute résolution : Mode 2 


Dans ce mode, un pixel a la forme suivante : 


l pas 
Le pixel est deux fois plus haut que large. 
2 pas [| On peut le colorier en deux couleurs seulement. 
L'écran est divisé en 128 999 pixels, 649 en largeur, 
multipliés par 299 en hauteur. 


Dans ce mode, comme dans tous les modes, un caractère est repré- 
senté dans une matrice de 8 X 8 pixels. 


Le chiffre 2 dans une matrice 8 X 8. 


Dans ce mode, un caractère est 
deux fois plus haut que large. 





En largeur on peut placer 649/8 caractères, soit 89 caractères par 
ligne. 


En hauteur, on peut placer 299/8 caractères, soit 25 lignes. 


Si la taille de la mémoire écran de l’ Amstrad est toujours la même, 
quel que soit le mode d’affichage choisi, elle est très simple à calculer 
en mode 2. On ne peut afficher un pixel qu’avec l’une des deux 
couleurs disponibles dans ce mode. Un bit suffit donc à représen- 
ter la couleur désirée (9 pour la couleur 1, 1 pour la couleur 2). 
128 900 bits, c’est-à-dire 128 909/8 = 16 099 octets, suffisent donc 
à représenter les 128 909 pixels de l’écran. 


Moyenne résolution : Mode 1 
Dans ce mode, un pixel a la forme suivante : 
2 pas 


Il est aussi haut que large : quatre couleurs sont 


2 pas 
P disponibles pour le colorier. 


L’écran est divisé en 329 x 299 = 64 099 pixels. Il est large de 
329/8 = 49 caractères et haut de 299/8 = 25 caractères. 


Deux bits sont nécessaires pour représenter le numéro de la cou- 
leur d’un pixel (9 à 3 donc 99 à 11). On retrouve les 128 999 bits 
(64 999 pixels x 2 bits) de la mémoire écran. 


Basse résolution : Mode ÿ 
Dans ce mode le pixel est deux fois plus large que haut : 


4 pas 


Seize couleurs sont disponibles pour le 


2 pas colorier. 


L’écran est divisé en 169 x 299 = 32 099 pixels. Il est large de 
169/8 = 29 caractères et haut de 29/8 = 25 caractères. 


Quatre bits sont nécessaires pour représenter la couleur d’un pixel 
(9 à 15 donc #99 à 1111). La mémoire écran reste bien de 
128 000 bits — 32 900 pixels X 4 bits. 


Points de repère dans le texte 


Il est habituel de situer un caractère sur l’écran en utilisant les 
coordonnées de texte. Celles-ci permettent de repérer un caractère à 
partir du caractère en haut à gauche de l’écran, en nombre d’empla- 
cements de caractère. Comme la taille des caractères varie d’un 
mode à l’autre, les mêmes coordonnées ne désignent pas le même 
caractère suivant chaque mode. 
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La figure suivante montre les emplacements dans les différents 
modes d’un caractère de coordonnées texte (2, 3). 


l 2 3 . PEER en mode ÿ..…. 29 
l 2 3 4 5 6 T5. en mode 1... 49 
1 2.3 4 5 6 7 8 9 19 11 12 13... en mode 2... 80 
OU 
NO D Le 
. D 
A 54 | 
3 
UININIIIN 
[UNIT 
/ AN x 
identiques, ++ 
eo — &—— caractère (2,3) caractère (2,3) caractère (2,3) 
ee largeurs en mode 2 en mode ! en mode ÿ 
d’un caractère 
en mode 2, 1,9 
2 


Le curseur de texte est l'emplacement caractère où doit être écrit le 
prochain caractère. Lorsque l’on affiche des caractères, il se déplace 
vers la droite et en fin de ligne, il saute à la ligne suivante. L’instruc- 
tion LOCATE permet de positionner le curseur de texte. Elle est 
suivie des coordonnées de texte désignant le nouvel emplacement du 
curseur. (Nous verrons plus loin qu’en réalité, l’ Amstrad possède 
8 curseurs de texte affectés à 8 fenêtres.) 


Repères dans les dessins 


Les points graphiques 


Contrairement aux coordonnées de texte, les coordonnées graphi- 
ques sont indépendantes du mode d’affichage. En effet, on ne repère 
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pas sur l’écran des pixels, mais des ‘‘points graphiques’? fictifs de 
largeur et de hauteur égales. 


1 pas 


1 pas [| Un point a la surface d’un demi-pixel de mode 2. 


L’écran est ainsi divisé en une mosaïque de 649 x 4ÿÿ points. N’en 
déduisez pas que la résolution de l’ Amstrad est de 649 x 499: elle 
est bien au maximum de 649 x 299 en mode 2. Les concepteurs de 
Amstrad ont simplement choisi des coordonnées graphiques : 


- indépendantes du mode d’affichage, 


- telles que les longueurs des pas en largeur comme en hauteur soient 
égales. 


Lorsque l’on ‘‘allume”” un point, on allume en réalité le pixel qui 
contient ce point. Voici les pixels allumés lorsque l’on fait par exem- 
ple PLOT 329, 269 (allumer le point de coordonnées 329 et 299), 
dans les différents modes. 


pixel 


320 
I 
pixel 





point point point 
en mode 2 en mode | en mode ÿ 


Pour vous en convaincre, passez en mode Ÿ et vérifiez que les 
instructions PLOT 329,299, PLOT 321,291, PLOT 322,200 et 
PLOT 323,291 ont pour effet d’allumer le même pixel. 


PLOT 324,291 allume le pixel voisin. 


320 324 
321,201 323,201 : 
| 
0-2 Pe 
209 --------- 2 


320,200 





pixel allumé pixel voisin, allumé par PLOT 
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L'origine graphique 


L'origine graphique est le point par rapport auquel sont repérés tous 
les autres points de l’écran. A la mise sous tension de l’ Amstrad, 
celle-ci se trouve en bas à gauche de l’écran. Il est possible de modi- 
fier l’origine graphique par l'instruction ORIGIN. 


Le programme suivant allume deux points de mêmes coordonnées 
mais par rapport à deux origines différentes. 


19 ORIGIN 0,9 

29 PLOT 199,199 
39 ORIGIN 329,209 
49 PLOT 199,199 


649 pas 





490 pas 


Deuxième point 
toujours de 
coordonnées 
190,199, mais 

| par rapport 

| à la nouvelle 
origine 





Première Premier Deuxième 
origine point origine 


Le curseur graphique 


Le curseur graphique est le dernier point de l’écran repéré par une 
instruction graphique. Comme le curseur de texte pour les caractè- 
res, 1l ‘‘suit’’ les dessins effectués et peut être déplacé par l’instruc- 
tion MOVE (équivalente du LOCATE). 


Couleurs disponibles dans chaque mode 


Oubliez l'instruction INK, les 27 couleurs (ou teintes de gris pour les 
moniteurs monochromes) de l’ Amstrad, et supposez que l’ Amstrad 


ne possède que 16 couleurs placées dans 16 encriers. (Dans la suite, 
jusqu’à l'instruction INK, nous emploierons uniquement le terme 
d’encrier au lieu de couleur.) 


Suivant le mode d’affichage choisi, le nombre d’encriers disponibles 
est différent. Si l’on choisit pour un pixel l’encrier n° 11 (1911 en 
binaire), celui-ci sera ainsi mémorisé dans la mémoire écran. 


1911] 11 dans le mode ÿ 
19 3 dans le mode 1 
191 1 dans le mode 2 


Seuls les bits de droite (de poids faibles) du numéro de l’encrier sont 
pris en compte. On retrouve bien le nombre de bits réservés à la cou- 
leur pour chaque pixel : 4 bits dans le mode Ÿ, 2 bits dans le mode 1, 
1 bit dans le mode 2. 


Ainsi, sont disponibles les encriers Ÿ et 1 dans le mode 2, les encriers 
9 à 3 dans le mode 1, les encriers Ÿ à 15 dans le mode ÿ. 


La couleur 





Colorier un caractère, un point ou une droite 


Pour colorier les pixels, nous disposons toujours de nos 16 couleurs 
placées dans nos 16 encriers. Tant que l’on ne précise rien, les pixels 
sont coloriés avec : 


- l’encrier 1, pour les pixels ‘‘allumés”” des caractères et pour les 
graphiques (points ou droites), 
- l’encrier Ÿ, pour les pixels ‘‘éteints’” des caractères (le ‘‘papier””). 


Les instructions PEN et PAPER permettent de changer d’encrier 
pour écrire les caractères. De même, dans les instructions du type 
PLOT ou DRAW, on peut préciser, derrière les coordonnées, le 
numéro de l’encrier désiré. 


Dans les deux cas (caractères et graphes) l’encrier fixé par ces ins- 
tructions reste valable jusqu’à ce que l’on choisisse un autre encrier. 
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19 PEN 1 : PAPER 12 ‘ Stylo encrier 1. Papier encrier 12. 


29 PRINT ‘BONJOUR’  ‘ Écrit avec encriers 1 et 12. 
Tous les caractères qui sont affichés jusqu’à la nouvelle 
commande sont coloriés avec les encriers 1 et 12. 


199 PEN 13 : PAPER Ÿ ‘ À partir de maintenant, les caractè- 
119 PRINT ‘BONJOUR’ res sont écrits avec les encriers 13 


et D. 
129 PLOT 329,209, 3 ‘ Les graphes sont coloriés avec 
l’encrier 3. 
139 DRAW 349,209 ‘ Colorié avec 3. 
Tous les graphes qui sont affichés sont coloriés avec l’en- 
crier 3. 
209 DRAW 9,9, 4 ‘ A partir de maintenant, les graphes 
219 DRAW 639,399 ‘ sont coloriés avec l’encrier 4. 


Lorsque l’on change d’encrier, les caractères ou graphes déjà 
affichés ne changent pas de couleur. Ceci permet de colorier indivi- 
duellement les caractères et les graphes. 


Voici un programme de démonstration. 


10 ’caracteres 


20 

SO MODE ©: m=O: n=8 

40 DATA c,o,u,l,e,u,r,s, Caracteres a afficher 

50 FOR is=Q TO 7 

60 FAFER i+ms FEN i+n "modification des encriers pour 

70 READ a$: PRINT a$%;: NEXT chaque caractere individuellement 
80 PAPER O: PEN 1 "restitue les anciens encriers 

90 ? 


100 ’qraphiques 

110 FOR i=0 TO 15 

120 PLOT 0,S#i,i point + choix de l’encrier i 

130 DRAW 639,Sti: NEXT la droite est coloriee avec l’encrier i 


27 couleurs ou teintes de gris pour 16 encriers. 


Bon nombre d'utilisateurs de micro-ordinateurs seraient déjà ravis 
de disposer de 16 couleurs et de pouvoir colorier à leur gré caractè- 
res, points et droites. 


L’Amstrad, lui, propose 27 couleurs ou teintes de gris. C’est un 
avantage bien sûr, mais cela complique un petit peu l’utilisation des 
couleurs. 
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Pour bien la comprendre, nous vous proposons de reprendre notre 
métaphore des 16 encriers, numérotés de 9 à 15. Lorsque l’on fixe les 
couleurs des caractères par PEN et PAPER, des points ou des droi- 
tes dans les instructions PLOT et DRAW, on ne donne pas un 
numéro de couleur, mais un numéro d’encrier. Les pixels sont 
coloriés avec l’encre contenue dans cet encrier. 


Pour utiliser les 27 couleurs, on doit modifier le contenu des encriers 
(initialement remplis, à la mise sous tension, de 16 encres de couleurs 
différentes). L’instruction INK permet de ‘‘remplir”” un encrier avec 
une nouvelle couleur. Tous les pixels allumés à cet instant avec cet 
encrier changent alors instantanément de couleur. Par exemple 
INK 3,19 qui remplit l’encrier n° 3 avec de l’encre de couleur n° 19 a 
pour effet de colorier tous les pixels allumés avec l’encrier 3 en cou- 
leur n° 19 (vert marin - gris très clair). 


La liste des numéros de chaque couleur est donnée dans le manuel 
utilisateur. 


ÿ Noir 9 Noir 
1 Bleu 1 Gris très foncé 
couleurs des plus foncées dégradé des gris foncés 
aux plus claires pour les aux gris clairs pour les 
moniteurs polychromes. moniteurs monochromes. 
25 Jaune pastel 25 Gris très clair 
26 Blanc 26 Blanc 


Voici un petit programme qui remplit dans les encriers @ à 15, dans 
l’ordre, les encres de couleur noire, bleu vif, mauve, rouge, rouge 
vif, verte, bleu ciel, jaune, blanche, orange, rose, vert vif, vert 
citron, jaune vif, jaune pastel, blanc brillant. 

5 ‘encriers 00,01,02,05,04,05,06,07.,08,09,10,11,12,13,14,15 

10 DATA 00,02,03,06,05,09,11,12,12%.15,16,18,21,24,25,26 


= 
20 FOR i=0 TO 15: READ a: INK 1,a: NEXT 


La ligne DATA donne les numéros des couleurs choisies. La ligne 29 
boucle en lisant ces données et en les plaçant dans les seize encriers. 
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Si l’on écrit PLOT 329,299,11 dans chaque mode nous savons que 
l’encrier utilisé est, 11 dans le mode Ÿ, 3 dans le mode 1, 1 dans le 
mode 2. 


PLOT 329,299,11 affiche donc : 


— en mode Ÿ, un point de couleur vert vif (n° 18) contenu dans 
l’encrier n° 11 ; 
— en mode 1, un point de couleur rouge vif (n° 6) contenu dans 
l’encrier n° 3 ; 
— en mode 2, un point de couleur bleu vif (n° 2) contenu dans 
l’encrier n° 1 ; 


Plutôt que de chercher à deviner, comme nous venons de le faire, 
quelle couleur va ‘‘donner”” telle ou telle instruction, nous vous 
conseillons d’adopter la démarche suivante : choisissez vos couleurs ; 
placez-les dans des encriers ; puis en fonction des encriers que vous 
avez utilisés, fixez pour le papier, le stylo et les dessins, les encriers 
voulus. 


Si vous voulez par exemple, pour un programme en mode 1, écrire 
les caractères en rouge sur fond blanc et dessiner en bleu, votre 
programme pourra commencer ainsi. 


10 ‘definition des couleurs 


20 MODE 1 

SO INK O©,13 ’encrier © contient blanc 

40 INK 1,3 ’encrier 1 contient rouge 

90 INK 2,1 ’encrier 2 contient bleu 

60 PAPER © papier encrier O ---»> blanc 
70 PEN 1 stylo encrier 1 ---> rouge 
80 PLOT ©0,0,2 ’point encrier 2 ---»> bleu 
90 


La suite du programme vous permettra de vérifier que les couleurs 
affichées sont bien celles prévues. 


à 

100 ’dessin d’une ellipse 

110 ? 

120 ‘demande de la largeur et hauteur de l’ellipse 
1:09 INPUT "largeur entre 1 et 319";larqg 

140 IF larg<1i OR larg>319 THEN GOTO 130 

130 INFUT “hauteur entre 1 æet 199";haut 

160 IF haut<1i OR haut>199 THEN GOTO 150 

170 * 

180 ‘affichage des valeurs 

190 CLS: PRINT “largeur="larg: PRINT “hauteur="haut 
200 

210 ’trace de l’ellipse 

220 DRIGIN 320,200: DEG 
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2530 FOR 1=0 TO 359 STEF 1 

240 PLOT largë#COS(i),hautæSIN(1): NEXT 

250 ” 

264 ‘suite ou non 

270 FRINT “une touche SVF" 

280 a$="": WHILE a$z"": a$=INKEYS: WEND ; 
290 IF a$<>"x'" THEN CLS: GOTO 130: ELSE END 


Ce programme trace au centre de l’écran une ellipse, dont il a 
demandé auparavant la largeur et la hauteur. Vous vérifierez que si 
les largeur et hauteur sont égales on obtient un cercle. 


En fin de tracé de la courbe, frappez X pour sortir du programme, 
un autre caractère pour tracer une nouvelle ellipse. 


Deux couleurs dans un encrier. Flash 


On peut placer dans un encrier deux encres différentes. 
INK 3,17,18 place alternativement dans l’encrier n° 3 les couleurs n° 
17 et n° 18. A l’écran les pixels allumés par l’encrier 3 ‘‘flashent”’. 


La vitesse de flash peut être réglée par l’instruction SPEED INK. 
SPEED INK 59,199 indique, en unités de 1/59° de seconde, les durées 
respectives durant lesquelles chaque encre reste dans l’encrier. 


| 1 
Dans notre cas, l’encrier 3 contiendra durant 59 x 50 — ] seconde 


la couleur 17, puis durant 199 X : = 2 secondes la couleur 18 et 
ainsi de suite. è 


Le ‘‘flash”’ peut être très intéressant pour afficher des caractères ou 
points clignotants sur lesquels on veut attirer l’attention. Il peut 
aussi être utilisé dans des applications psychédéliques très artisti- 
ques, mais attention aux yeux ! 


Il peut être tout aussi intéressant, sur programme d’interruption par 
exemple (voir plus loin), de redéfinir périodiquement le contenu des 
encriers et d’obtenir des effets moins violents que le flash. Le 
programme que nous vous présentons exécute une permutation des 
couleurs dans les douze encriers utilisés pour dessiner un cercle. Les 
couleurs choisies se trouvent dans la gamme 4 à 15. La boucle com- 
mençant à la ligne 179 exécute la permutation du contenu des 
encriers. Les lignes 229 et 239 ‘‘décalent”” après chaque permutation 
la valeur initiale de la couleur. Ce programme a autant d'intérêt 
pour les moniteurs monochromes, que pour les polychromes. 
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iuU ‘ impression de deplacement 
0 À 


20 ‘ remplir les encriers 


40 MODE &: INK 0,0: PAFER ©: DEG 

30 FOR 1=4 TO 15: INK 1,1+10: NEXT 

Et * 

70 * dessin d’un cercle avec 12 couleurs 
80 FOR 1=0 TO 3559 

90 ORIGIN 320,200 

100 H=INT(1/15): k=zk-12#INT(kK/12) +4 
110 DRAW 100C0S(1),1004SIN(i),k 

120 NEXT 

170 * 


140 ‘64 permutations des 12 couleurs du cercle 
190 coul=25 

160 FOR nb=0 TO 63 

170 FOR 1=z4 TO 15 

180 INK i,.coul 

190 coul =coul+1 

200 IF coul >25 THEN coulz=coul-12 
210 NEXT 

220 coul=coul-1 

230 IF coul<14 THEN coulzcoul+12 
240 NEXT 


BORDER 


Cette instruction n’est pas tout à fait équivalente à PEN ou PAPER. 
C’est un encrier supplémentaire dans lequel on place directement la 
(ou les 2) couleur(s). 


Exemple : 


BORDER 3,24 fait ‘‘flasher”” le cadre de l’écran en rouge (couleur 
n° 3) et en jaune (couleur n° 24). 


Modes d’écritures spéciaux 


— Écriture de caractère. 


Le caractère de contrôle 22 permet de modifier l’écriture des caractè- 
res. 


PRINT CHR$(22) + CHRS(1) oblige les caractères à être écrits en 
mode transparent. Dans ce mode, seuls les pixels ‘‘allumés’” des 
caractères sont pris en compte; les pixels éteints ne sont pas affichés 
à l’écran. Ceci permet de faire cohabiter caractères et graphiques. 
PRINT CHRS$(22) + CHR$(Ÿ) permet de revenir au mode normal, 
opaque. 
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— Affichage des graphiques. 


Le caractère de contrôle 23 permet de modifier l’affichage des 
graphiques. 


PRINT CHRS$(23) + CHRS$(Ÿ) commande le mode normal. 
PRINT CHRS$(23) + CHRS$(1) commande le mode XOR. 
PRINT CHRS$(23) + CHRS$(2) commande le mode AND. 
PRINT CHRS$(23) + CHRS$(3) commande le mode OR. 


Dans l’un des trois modes XOR, AND, OR un pixel graphique n’est 
pas affiché avec la couleur de son encrier (comme dans le mode 
normal), mais avec la couleur de l’encrier de numéro : 


numéro de l’encrier du KOR numéro de l’encrier 
Le x 9 7 AND ’ ce 7 . 
pixel actuellement à l’écran. OR spécifié pour le pixel 


Par exemple, en mode AND), si le pixel de coordonnées 329,299 est 
affiché avec l’encrier 13 (1191) et si l’on fait PLOT 329,209,11 
(encrier 1911), le pixel sera colorié avec l’encrier 9 (1991). En effet 
1191 AND 1911 = 1991. 


Ces commandes sont très pratiques, mais elles nécessitent un choix 
judicieux des encriers et des couleurs. Voici, nous l’espérons, deux 
exemples de choix judicieux! 

10 MODE ©: DATA 0,15,6,24,: FOR 1=0 TO 3: READ a: INK i,a: NEXT 

20 PAPER O: PEN 3: CLS: FOR i=z0 TO 2: PRINT "bonjour": NEXT 


30 FOR 1=0 TO 2: PRINT CHRS (23) +CHR$(i+1); 
4Q FLOT 0,391-16%1,2: DRAW 22S5,391-16%it NEXT 


Les instructions 19 et 29 définissent les quatre couleurs utilisées et 
affichent trois fois ‘‘bonjour”’’. L’instruction 49 raye les trois ‘‘bon- 
jour’’ avec une droite dans les modes XOR, AND puis OR. 


‘“bonjour”’’ est entièrement rayé en mode XOR. Sur le fond en noir, 
2 XOR 9 = 19 XOR 99 = 19 = 2, la ligne apparaît en rouge 
(2 contient la couleur 6). Sur les caractères en jaune (encrier 3), 
2 XOR 3 = 19 XOR 11 = Ÿ1 = 1, la ligne apparaît en orange 
(1 contient la couleur 15). 
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La droite apparaît ‘‘devant’” le mot. 


En mode AND), seuls les caractères sont rayés. En effet 
2 AND Ÿ = 19 AND 69 = 49 = 9, 

la ligne n’apparaît pas sur le fond. 

2 AND 3 = 19 AND 11 = 19 = 2, 

la ligne est tracée en rouge sur le caractère. 


En mode OR on a 

2OR9 = 19 OR 99 = 19 = 2, 

la ligne apparaît sur le fond. 
20R3=1I9OR 11 = 11 = 3, 

la ligne n’apparaît pas sur le caractère. 


La droite apparaît ‘‘derrière’” le mot. 


Le programme suivant dessine une spirale, en mode OR. Le papier 
est en encrier Ÿ (couleur bleue), l’intérieur de la spirale en encrier 2 
(couleur rouge), les points de la spirale en encrier 3 (couleur jaune). 
Les encriers 2 et 3 sont toujours visibles sur le papier (2 OR 9 = 2, 
3 OR 9 = 3). Les points de la spirale sont prépondérants sur l’inté- 
rieur (3 OR 2 = 3). Ceci permet de dessiner très facilement la spirale. 


10 ‘dessin et coloriage d’une spirale 
20 ’initialisation encres, modes d’ecriture 
30 MODE 1: INK O,1: INK 1,3:INK 2,3: INK 3,24 


40 PAPER ©: FEN 1 papier en encrier Ô 
30 FRINT CHR$S (23) +CHRS (3) ; mode OR 

60 DEG: ORIGIN 320,200 

rés D 


80 ’interieur de la spirale en encrier 2 

90 ’plus "fort" que O (papier), moins "fort" que 3 
100 FOK 1=0 TO 379 STEP 1 

110 MOVE 0,0 

120 DRAW (1/2)4C0S(2%1).(1/2)4SIN(2%i),2 

130 ? 

140 ‘coloriage des points de 1a spirale en encrier = 
150 ‘plus "fort" que O et 2? 

1860 PLOTR 0,0,3: NEXT 


Les instructions de texte 
Les huit canaux d’affichage 


Changeons nos habitudes 


Les instructions de texte qu'offre le BASIC Amstrad sont CLS, 
LOCATE, PAPER, PEN, POS et VPOS, TAG et TAGOFF ainsi 
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que INPUT, LIST et PRINT. La plupart sont ‘‘standard’””’. CLS : 
efface l’écran ; LOCATE : positionne le curseur sur l’écran ; PRINT 
affiche un caractère à l’écran.. Nous avons déjà vu PEN et PAPER 
qui fixent les couleurs des caractères. Quatre instructions sont moins 
connues : POS, VPOS, TAG et TAGOFF; nous les verrons plus 
loin. 


La particularité du BASIC Amstrad est qu’en réalité ces instructions 
ne ‘‘travaillent”” pas sur l’écran, mais sur une fenêtre. Et si l’on veut 
continuer à parler d’écran pour la description des instructions de 
texte, 1l faut alors dire que l’ Amstrad possède huit écrans ! Et ceci 
nous oblige à changer nos habitudes. 


CLS n'’efface pas l’écran. 
CLS est en réalité CLS # Ÿ, qui efface la fenêtre ÿ. 


LOCATE 2,3 ne positionne pas le curseur de texte au point de 
coordonnées (2,3) de l’écran. 


LOCATE 2,3 est en réalité LOCATE # Ÿ, 2, 3. Cette instruction 
positionne le curseur de l’écran de texte numéro Ÿ, au point de 
coordonnées (2,3) dans la fenêtre ÿ. 


Les huit canaux d’affichage 


Le BASIC Amstrad gère en effet huit canaux d’affichage. Il offre 
ainsi la possibilité d’acheminer un caractère jusqu’à l’écran ‘‘physi- 
que”” du moniteur, à travers l’un de ces huit canaux. A chaque canal 
correspond une zone bien déterminée de l’écran : une fenêtre. Une 
fenêtre peut occuper tout ou une partie de l’écran. Les fenêtres 
peuvent se superposer. 


Voici les caractéristiques que l’on peut affecter à chaque canal, 
indépendamment les uns des autres : 


- la taille et la position de la fenêtre sur l’écran, 

- la position du curseur affecté à ce canal, dans la fenêtre, 

- le choix des encriers pour le papier (PAPER) et le stylo (PEN) de 
ce canal, 

- l’écriture en mode opaque ou transparent dans la fenêtre, 

- l’écriture des caractères en mode graphique (voir TAG). 
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En revanche, les caractéristiques suivantes ne peuvent être choisies 
indépendamment pour chaque canal : 


- le mode d’affichage (MODE), 
- la couleur dans les encriers (INK), 
- les matrices des caractères (voir plus loin). 


Derrière une instruction de texte, on doit préciser, si l’écran sur 
lequel on veut travailler n’est pas l’écran Ÿ, le numéro du canal 
voulu, précédé du signe #. Par exemple : 


CLS # 1 efface la fenêtre (l’écran) n° 1. 


LOCATE #1, 2, 3 positionne le curseur n° 1 au point (2,3) de la 
fenêtre 1, etc. 


A défaut, si le numéro de canal n’est pas indiqué, le BASIC exécute 
l'instruction sur la fenêtre ÿ. 


L’instruction WINDOW 


Cette instruction permet de délimiter la fenêtre affectée à un canal. 
On indique en coordonnées de texte dans l’écran les limites gauche, 
droite, haute et basse de la fenêtre. 


WINDOW # n° de canal, gauche, droite, haut, bas. 
Exemple : 


WINDOW #1, 11, 29, 8, 18 affecte l’une de ces zones écran au 
canal 1. 


Comme on le voit sur la figure suivante, la taille et l'emplacement de 
la fenêtre dépendent du mode d’affichage. Un programme qui utilise 
des fenêtres doit être entièrement conçu en fonction du mode d’affi- 
chage utilisé. 


A la mise sous tension de l’ Amstrad, les huit fenêtres affectées aux 
huit canaux occupent l’écran entier, quel que soit le mode d’affi- 
chage choisi, jusqu’à ce que l’on utilise WINDOW. 
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11 (mode 6) 
20 (mode 1) 
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29 (mode 2) 

11 (mode 2) 


L’instruction WINDOW SWAP permet d’échanger entre deux 
canaux les limites des fenêtres allouées à chaque canal. 


WINDOW SWAP 1,2 : la fenêtre du canal 1 devient celle du canal 2 
et vice versa. 


Intérêt des fenêtres 


La technique des fenêtres présente un grand intérêt. Elle permet au 
programmeur de présenter les résultats de ses programmes, de ques- 
tionner l’utilisateur d’une manière claire et agréable, sans difficulté 
de programmation particulière. 


Le programme suivant divise l’écran en huit fenêtres, dont les limites 
sont calculées au sous-programme placé à la ligne 1990. Il rappelle la 
liste des instructions les plus importantes ‘‘travaillant”” sur des fenê- 
tres. | 
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10 MODE © 


20 FOR i=0Q0 TO 7 ‘huit fenetres 

30 GOSUB 1000 "calcul des limites 

3S WINDOW #i,gauche,droite.haut.bas ‘declaration de la fenetre 
40 PAPER #i,2#i papier de la fenetre 

50 PEN #i,2%i+1 stylo de la fenetre 

60 CLS #i ‘efface la fenetre 

70 LOCATE #1,2,6 “positionne dans ia fenetre 
80 PRINT #i,"abc" affichage dans la fenetre 
90 NEXT 

100 END 

998 


999 ’calcul des limites de la fenetre i 
1000 gauche = (i-4%INT(1/4))25+1 

1010 droite = gauche + 4 

1020 haut = (INT(i/4))413+1 

1030 bas = haut + 12 

1040 RETURN 


Ce programme n’est qu’une illustration de l’utilisation des fenêtres. 
Il faut remarquer qu’il serait bien difficile d’obtenir le même résultat 
sans l’instruction WINDOVW et les instructions de texte ‘‘par canal”’. 
La technique des fenêtres devient vite indispensable, dès que l’on en 
dispose. 


Les instructions POS et VPOS 


Ces instructions donnent la position dans une fenêtre du curseur de 
texte associé à la fenêtre. POS donne la coordonnée horizontale, 
VPOS la coordonnée verticale. Ces instructions peuvent être très 
utiles dans un programme de traitement de texte. Le programme sui- 
vant utilise POS pour afficher une ligne de prénoms sans les ‘‘cou- 
per”” en fin de ligne, dans la mesure, bien sûr, où ceux-ci ne sont pas 
plus longs que les lignes. Essayez-le plusieurs fois en modifiant les 
prénoms dans les lignes DATA. 


[a] 

9 ‘la fenetre 0 occupe la moitie de l'ecran (20 caracteres) 
10 MODE 1: WINDOW 1,20,1,25 

18 ” 

19 ‘declaration des prenoms sur deux lignes DATA 

20 DATA pierre. jæean,luc,francois,albert 

30 DATA elisabeth,paula,francine,ernestine,genevieveg, 

58 ” 

39 ‘pour les 10 prenoms, lire le prenom 

40 FOR 1=0 TO 9 


30 READ a$ 

59 ” s1 le prenom a une longueur superieure à la fenetre 
60 IF LEN(a$) >20 THEN GOTO 70 ELSE GOTO 80 

68 * alors si le curseur n'est pas en debut de ligne 

69 _ alors retour a la ligne 
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70 IF POS(#O0)=i THEN GOTO 100 ELSE FRINT: GOTO 100 


F7 ” sinon longueur restante est calculee dans long 

78 ” si longueur du caractere est superieure a jong 

79° alors retour a la ligne 

80 long=20-POS (#0) 

90 IF LEN(a$)<long THEN GOTO 100 ELSE PRINT: GOIO 1u0 
99 * ecriture du prenom 

100 PRINT a$" ": 

110 NEXT 


L’instruction POS permet de savoir, en 79, si le curseur se trouve en 
début de ligne. Elle permet de calculer, en 89, le nombre de caractè- 
res qu’il est encore possible d’écrire dans la ligne. Nous avons utilisé 
la fenêtre Ÿ, ramenée à la moitié de l’écran. 


Les instructions TAG et TAGOFF 


L’instruction TAG est l’une des instructions les plus puissantes que 
propose le BASIC Amstrad dans le domaine graphique. Elle permet, 
jusqu’à ce que l’on utilise TAGOFF d’écrire des caractères en mode 
graphique : 


— les caractères sont écrits à l'emplacement du curseur graphique; 


SR. Les caractères sont affichés à l’empla- 
<— curseur er à 
cement pointé en haut à gauche par le 
graphique 
curseur graphique. 
Lorsque l’on écrit un caractère, le 
emplacement curseur graphique se déplace. 
du caractère 


— les caractères sont coloriés avec la couleur alors utilisée par les 
graphiques pour les pixels ‘‘allumés”” ; avec la couleur de l’encrier Ÿ 
pour les pixels ‘‘éteints””. 


On le voit, cette instruction permet d’afficher les caractères en 
dehors de la grille qui leur est normalement imposée (les emplace- 
ments de caractères). Elle permet donc d’afficher des caractères ‘‘un 
peu partout, dans tous les sens”’. Elle permet aussi de commenter 
sans difficulté un graphique, quelle que soit sa position à l’écran; 
indication de l’équation de la courbe que l’on vient de tracer ; indica- 
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tion du contenu de chaque part dans une représentation en ‘‘camem- 
bert””, etc. Nous vous donnerons des exemples d’utilisation de TAG 
dans les ‘‘instructions graphiques”’. 


Les instructions graphiques 


L’instruction ORIGIN. La fenêtre graphique. CLG 


Nous avons déjà vu l’instruction ORIGIN. Elle permet de modifier 
l'emplacement du point par rapport auquel tous les autres points de 
l’écran seront repérés. Cette instruction peut être complétée par 
quatre paramètres supplémentaires donnant les limites gauche, 
droite, haute et basse de la fenêtre graphique. Si ces paramètres ne 
sont pas donnés, la fenêtre graphique n’est pas modifiée. Elle 
occupe, à la mise sous tension de l’ Amstrad, l’écran entier. 


ORIGIN coord. larg., coord. haut., gauche, droite, haut, bas. 


Ces valeurs sont indiquées en coordonnées graphiques par rapport 
au point en bas à gauche de l’écran. 


Le programme suivant définit une fenêtre graphique à droite de 
l’écran de 499 pas de largeur sur 499 pas de hauteur. Nous avons 
limité la fenêtre Ÿ de texte à la zone de l’écran restant. (Il reste en lar- 
geur 249 pas, soit 129 pixels en mode 1, soit 129/8 = 15 caractères.) 
Nous utilisons l'instruction CLG qui permet d’effacer avec l’encrier 
9 la fenêtre graphique. PLOTR 9,9 donne la position du curseur 
graphique, donc de l’origine à ce moment. 

Nous avons écrit en haut à gauche de chaque fenêtre, en utilisant 
LOCATE pour positionner le curseur de texte, MOVE pour position- 
ner le curseur graphique, le type de chaque fenêtre. Remarquez l’utili- 
sation de TAG qui permet d’écrire dans la fenêtre graphique. Remar- 
quez aussi, après avoir lancé ce programme, les couleurs de chaque 
zone. (Réinitialisez éventuellement votre Amstrad si vous avez beau- 
coup utilisé INK jusqu’à maintenant. Nous n’avons pas pris le soin de 
redéfinir les encriers.) 
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position du curseur graphique 
donnée par MOVE - 299,199 


fenêtre texte 


fenêtre graphique 





400 


200 - -- 


origine (allumée 
par PLOTR 6,4) 


249 pas, 
c’est-à-dire 
15 caractères 
en mode 1 


1 MODE 1: PAPER 2: PEN 3: KHORDERK 0 ? mode et couleurs 
29 ORIGIN 440,200,240,639,399,0 fenetre graphique 
SO WINDOW 1.15,1,25 fenetre © de texte 
40 CLS: CLG: FLOTR 0,0 

950 LOCATE 1,1: FRINT "fenetre texte" ’locate 

60 TAG: MOVE -200,199 move sous taQ 

/0 PRINT "fenetre graphique‘; 

8 TAGOFF 


L'intérêt de la fenêtre graphique est de pouvoir délimiter la zone de 
l’écran réservée aux graphiques. En dehors de cette zone, si l’on 
vient à ‘‘déborder””, les dessins (et les écritures sous graphique) ne 
sont pas affichés. Avec l’instruction WINDOVW elle permet de sépa- 
rer très facilement, comme nous venons de le faire, l’écran en une 
zone de texte et une zone de dessin. 


Remarque 


Il est possible de donner à une coordonnée graphique une valeur 
allant de — 32768 à + 32767 ( — &8009 à + &7FFF). Rien n'empêche 
de placer l’origine ou un point en dehors de la fenêtre graphique et 
de l’écran. Frappez ces instructions pour vous en convaincre, à la 
suite de notre programme précédent. 
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ORIGIN —39099, —39994 (l’origine se trouve bien loin de 
l’écran !). 


PLOT 39499, 30299 (le point apparaît sur l’écran). 


DRAW 39890, 39299 (la droite sort de la fenêtre graphique et de 
l’écran). 


Les instructions graphiques permettent de ‘‘travailler’”’ sur un 
immense plan de 65 536 X 65 536 pas dont la fenêtre graphique n’est 
que la minuscule partie visible. 


Instructions graphiques 


La liste des instructions graphiques de l’ Amstrad est la suivante : 
MOVE et MOVER déplacent le curseur graphique. 

PLOT et PLOTR allument un point. 

DRAW et DRAWR tracent une droite. 

TEST et TESTR donnent la couleur (le n° de l’encrier) d’un point. 


XPOS et YPOS fournissent les coordonnées horizontale et verticale 
du curseur graphique par rapport au point d’origine. 


Coordonnées absolues et relatives 


Nous reviendrons plus loin sur les instructions XPOS et Y POS. Les 
autres instructions graphiques sont toujours suivies des coordonnées 
d’un point(et d’un seul). 


MOVE(R), le point où l’on place le curseur graphique. 
PLOT(R), le point que l’on allume. 


DRAW(R), le point de la seconde extrémité de la droite, la première 
extrémité étant le point où se trouve le curseur graphique. 


TEST(R), le point dont on désire connaître la couleur. 


(Éventuellement, comme nous l’avons vu, PLOT(R) et DRAWI(R) 
peuvent encore être suivies du numéro de l’encrier utilisé pour la 
couleur.) 
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Ce qui différencie les instructions se terminant par ‘‘R’’ des autres 
instructions est la manière dont on indique l’emplacement du point. 
Dans les instructions du type MOVE, on donne les coordonnées du 
point par rapport à l’origine. (Spécifié dans la commande ORIGIN.) 
Dans les instructions du type MOVER, on donne les coordonnées du 
point par rapport au curseur graphique. 


Rappelons que le curseur graphique est déplacé : 


- après MOVE(R) vers le point spécifié, 

après PLOT(R) vers le point allumé, 

après DRAW(R) vers le point extrême de la droite tracée, 
- après TEST(R) vers le point testé. 

- lorsque l’on écrit sous graphique (voir TAG). 


Le schéma suivant doit vous permettre de bien différencier les deux 
manières de ‘‘pointer’’ l’écran. 


point repéré 


Si le curseur se trouve au 

point de coordonnées 

259 et 299 par rapport à 
l’origine, le point repéré,  , sol 
de coordonnées 499,259 

par rapport à l’origine, a 

pour coordonnées par 
rapport au curseur 159 

et 5ÿ. 


250 
200 





origine + 150 


Dans ce cas les instructions PLOT 499,259 et PLOTR 159,59 ont le 
même effet : allumer le point repéré. De même les instructions 
DRAW 499,259 et DRAWR 159,54 ont le même effet : tracer la 
droite entre le curseur et le point repéré. Dans tous les cas, le 
curseur se trouve ramené au point repéré. 


Le programme suivant donne un exemple d’utilisation des coordon- 
nées absolues et relatives. L’instruction PLOT est utilisée pour posi- 
tionner et dessiner une sinusoïde. L’instruction PLOTR permet de 
recopier cette courbe en diagonale 14 fois de suite, en 14 couleurs 
différentes. Chaque courbe est recopiée 19 pas à droite, 19 pas en 
haut, relativement à la précédente. 
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L'origine est placée en 9,199. La boucle commence à dessiner un 
point de coordonnée horizontale — 149, donc en dehors de l’écran 
(mais dans l’immense plan invisible). Ceci permet à la quatorzième 
recopie (et aux précédentes) d’être visible sur toute la largeur de 
l’écran. 


10 MUDE 0: CLS: DEG: ORIGIN 9; 100,0.639,399,0 
29 FOR iz=z-140 TO 6839 STEP 1 ’pour plus que largeur ecran 


30 PLOT 1,100%SIN(1),1 ’tracer la sinusoide 
40 FOR j=Q0 TO 13 recopier 14 fois ce point 
50 PLOTR 10,10,j+2 aux coordonnees relatives 10,10 


6 NEXT: NEXT 


D'une manière générale, les instructions en coordonnées absolues 
sont plutôt utiles pour tracer des courbes à partir d'équations mathé- 
matiques bien déterminées. Les instructions relatives permettent de 
se déplacer ‘‘au coup par coup’’ dans une zone de l’écran dont on ne 
connaît pas, a priori, l'emplacement. Elles permettent de souligner 
très aisément des mots écrits sous mode graphique, de tracer des 
flèches vers un point bien précis d’un graphe, sur lequel on désire 
attirer l’attention, etc. 


Dans le programme suivant, l’instruction MOVE permet de posi- 
tionner le début des lignes que l’on écrit sous mode graphique 
(TAG). C’est ensuite l’instruction MOVER qui est utilisée pour diri- 
ger le curseur graphique, évitant ainsi des calculs compliqués et 
rendant le programme indépendant du mode d’affichage. (C’est 
pourquoi le programme vous demande le mode choisi — faites bien 
attention à répondre Ÿ, 1 ou 2, la réponse n’est pas contrôlée — 
faites ESC deux fois pour sortir du programme.) 


10 DATA ca, ,.m.o.n,t,e, .e 
20 DATA tt. .c.a, .d,e,5,c,e,n.d 
30 DATA e.n, ,.Mm,e;,re sCpsûä ,0.n.,d,u.1.e, 


40 INFUT "mode'":i: MODE ir: ORIGIN 0,0: DEL 
45 FLOT -1,-1.1 ‘initialise encrier des graphiques hors ecran 
50 TAG 


où MOVE 50,360: PRINT ‘en montagne‘: 

70 MOVE 0, 200 

80 FOR 1i=0 10 9: MOVER 1,8: GOSUR 1000: NEXxI ‘ca monte 
90 FOR 1=0 TO 11: MOVER 1,-8: GOSUK 1000: NEXT ’ca descend 
100 MOVE 0,100 

110 FOR 1=0 TO 16 


20 MOVER 3,8#SIN(308%i): GOSUB 10001 NEXT ‘ca ondule 
130 TAGOFF: RESTOREs: GOTO 40 
998 


999 ‘lecture et affichage de caractere 
1000 READ a$: FRINT a$%3;3s: RETURN 


32 


Les instructions TEST et TESTR 


Ces instructions permettent de connaître le numéro de l’encrier uti- 
lisé pour colorier un point, dont les coordonnées sont indiquées 
d’une manière absolue (TEST) ou relative (TESTR). Ces coordon- 
nées sont placées entre parenthèses. 


A = TEST (329,299) place dans la variable A le numéro de l’encrier 
utilisé pour dessiner le point 329,294. 


Ces instructions s’avèrent bien utiles dans la panoplie du BASIC 
Amstrad. En effet la structure assez complexe de la mémoire écran 
(due aux trois modes d’affichage) interdit les analyses (et modifica- 
tions) aisées de la mémoire écran par les traditionnels PEEK et 
POKE. 


Nous vous proposons un exemple d’utilisation de TEST dans le pro- 
gramme suivant. Celui-ci est une variante de notre précédent pro- 
gramme traçant quatorze sinusoïdes. Dans ce programme on 
n’allume un point (PLOT ou PLOTR) que si ce point a la couleur du 
fond ; ici la couleur Ÿ. (Voir le sous-programme à la ligne 1999.) La 
modification a pour effet d’inverser l’impression de relief. Remar- 
quez comment le programme initial a été modifié, et en particulier 
l’utilisation des coordonnées relatives (TESTR, PLOTR). 


10 MODE U: ULS: DEGs ORIGIN 0,100,0,.862:9,2:99.u0 
20 FOK i=-140 T0 639 STEF 1 
30 MOVE i,.1004%SIN(i): coul=1: GOSURH i1oou 


40 FOR j)=0 10 135 

90 MOVER 10,10: coul =j+2: GOSUEH j000 

60 NEXT:NEXT:END 

998 ” 

999 ‘ecrit point si couleur actuelle est celle du fond 
1000 IF TESTR(G,0)=0 THEN PLOTR 0,0,coul 


1010 RE TUKN 


Les instructions TEST permettent de dessiner ‘‘en fonction du 
terrain’; de ne pas effacer telle ou telle partie de l’écran avec un 
graphe, etc. Elles peuvent aussi être utilisées pour une analyse fine de 
l’écran et en particulier des caractères. Nous en donnons un exemple 
dans la ‘‘redéfinition graphique des caractères’’. 


Les instructions XPOS et YPOS 


Ces instructions donnent les coordonnées horizontale (XPOS) et 
verticale (YPOS) du curseur graphique par rapport à l’écran. 
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a = XPOS : b = YPOS placent dans les variables a et b les coordon- 
nées du curseur graphique. 


XPOS et YPOS sont équivalentes pour le graphisme à POS et VPOS 
pour le texte. En particulier lorsque l’on écrit sous mode graphique 
elles permettent de savoir à quel moment il est nécessaire de revenir à 
la ligne (par un MOVE) pour éviter de ‘‘sortir”” de la fenêtre graphi- 
que ou d’une zone choisie. Elles permettent aussi de mémoriser les. 
coordonnées de points ‘‘stratégiques’” vers lesquels on veut pouvoir 
revenir. Elles sont très utiles pour ‘‘se repérer’”” sur l’écran après 
avoir utilisé des instructions graphiques en coordonnées relatives. 


La redéfinition graphique des caractères 


L’Amstrad offre la possibilité de redéfinir le graphisme des caractè- 
res. Ceci permet à l’utilisateur (qui utilisera aussi la redéfinition des 
touches, voir le chapitre IV) d’adopter des alphabets différents, ou 
de compléter l’alphabet anglo-saxon de l’ Amstrad. Il est ainsi possi- 
ble, grâce à la redéfinition graphique, de dessiner les ç, à, à, ï, ê, é, 
è... retrouvant ainsi les accents et cédille chers à notre vieille langue 
française, puis grâce à la redéfinition des touches de créer un clavier 
AZERTY, cher à notre cœur, et à nos habitudes! 


Représentation d’un caractère 


L’Amstrad contient en mémoire morte la forme initiale des 
256 caractères qu’il possède. (Cette forme est donnée pour chaque 
caractère dans le manuel utilisateur.) La représentation en mémoire 
d’un caractère est extrêmement simple. Nous vous proposons de 
l’étudier pour le caractère 2. 
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matrice binaire hexadécimal décimal 







L| 7,77, Ÿ) ty &3C 69 
77 || 4 0 ] &66 102 

| 7 7 V, 0 &06 06 

| 2% 77 ME ÿ F, &3C 60 
7 7 oh É, F, &60 96 

| 777 7 M U, ) &66 196 
HZ | 9 @ &IE 126 
RÉRRSERRERE 0  &o 00 


A gauche nous avons représenté le caractère dans sa matrice de 
8 X 8 pixels. Au centre nous avons remplacé les pixels allumés du 
caractère par un 1, les pixels éteints par un Ÿ. (On retrouve la forme 
du caractère en entourant la zone où se trouvent les 1.) Chacune des 
huit lignes du caractère est ainsi représentée par une suite de huit 
chiffres binaires (9 ou 1), c’est-à-dire par un octet. Nous avons 
donné à droite la valeur en hexadécimal puis en décimal des huit 
octets représentant le caractère 2. 


Les lecteurs non familiers avec les systèmes de numérotation binaire 
et hexadécimal pourront utiliser la méthode de calcul suivante. 


On donne à chaque pixel d’une ligne une valeur : 128 pour le pixel le 
plus à gauche de la ligne, puis 64, 32, 16, 8, 4, 2 et 1 pour le pixel le 
plus à droite. La valeur d’une ligne est la somme des valeurs des 
pixels allumés. Par exemple la deuxième ligne du caractère 2, a pour 
valeur 64 + 32 + 4 + 2 = 192. 


SYMBOL AFTER 


Il faut, nous venons de le voir, huit octets pour représenter la forme 
d’un caractère. Pour 256 caractères, il faut donc 8 X 256 soit 
2048 octets, 2 k-octets de mémoire. 


Ces 2 k-octets se trouvent bien sûr en ROM (car sinon les caractères 
auraient une forme bien bizarre à la mise sous tension de l’ Amstrad). 
Par contre lorsque l’on modifie la forme d’un caractère, la représen- 
tation de celui-ci est obligatoirement stockée en RAM (la seule 
mémoire où l’on puisse écrire). L’instruction SYMBOL AFTER per- 
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met de réserver une zone de mémoire RAM qui sera utilisée pour 
stocker les nouvelles représentations de caractères. Cette instruction 
est suivie d’une valeur de 9 à 255. Elle signifie que tous les caractères 
dont la valeur ASCII est supérieure ou égale à la valeur indiquée ont 
leur représentation stockée en RAM, et qu’il est possible de les modi- 
fier. (Vous trouverez de plus amples informations sur les valeurs 
ASCII au chapitre IV.) 


SYMBOL AFTER a pour effet de recopier toutes les représentations 
de caractère dont la valeur ASCII est supérieure ou égale à la valeur 
indiquée, de la zone ROM, où elles sont initialement stockées, vers la 
zone RAM réservée. Relisez bien ; cela signifie que les modifications 
de graphisme de caractères que vous auriez pu faire avant SYMBOL 
AFTER sont effacées. Cette remarque, ainsi que celle que vous trou- 
verez dans l’étude du plan mémoire de l’ Amstrad, doit achever de 
vous convaincre du principe suivant. N’utiliser SYMBOL AFTER 
qu’une seule fois dans un programme (et au début de celui-ci de pré- 
férence !). 


L’instruction SYMBOL 


Cette instruction permet de redéfinir le graphisme d’un caractère 
dont on donne la valeur ASCII, puis les huit octets de la représenta- 
tion du caractère. La liste des valeurs ASCII de chaque caractère est 
fournie dans le manuel utilisateur. Pour être exécutée il faut que la 
valeur ASCII du caractère soit supérieure à celle autorisée par 
SYMBOL AFTER. Le plus simple est de commencer le programme 
par SYMBOL AFTER #. 


Le programme suivant donne un exemple de modification du carac- 
tère 2. Sa valeur ASCII est 59. Nous avons fait suivre l’instruction 
SYMBOL de cette valeur, puis des huit valeurs de la nouvelle repré- 
sentation du caractère. 


10 MODE O: SYMHOL AFTER O 

20 FRINT ‘avants PRINT: PRINT “ 2 

3O SYMEHOL 50,126,98,2,126,64,70,126.0 

40 LOCATE 7,1: PRINT ‘“apres'":s LOCATE 9,3: PRINT "2: PRINI 


Exécutez le programme deux fois pour vérifier que la seconde fois 
SYMBOL AFTER ÿ a détruit la modification du caractère 2. Faites 
ensuite SYMBOL AFTER Ÿ pour retrouver un ‘‘2’’ normal. 
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Éditeur de caractères 


Le programme suivant est un éditeur de caractères. Il vous demande 
tout d’abord si c’est la première fois que vous lancez ce programme. 
Répondez O pour Oui, N pour Non. Si vous répondez Non, le pro- 
gramme n’exécute pas l'instruction SYMBOL AFTER Ÿ, et n’efface 
donc pas les modifications de caractères que vous avez déjà effec- 
tuées. Il vous demande ensuite si vous voulez modifier un caractère. 
Si vous répondez N pour Non, le programme se termine. Si vous 
répondez par un autre caractère (par exemple O pour Oui) on vous 
demande la valeur ASCII (entre @ et 255) du caractère que vous vou- 
lez modifier. (Répondez par exemple 59 qui est la valeur ASCII du 
caractère 2, pour une première utilisation.) Le programme affiche 
alors à droite de l’écran le caractère qu’il recopie dans une matrice 
plus visible. Un curseur clignotant est affiché. Pour le déplacer, utili- 
sez les touches de déplacement du curseur. Pour modifier un pixel, 
placez le curseur sur celui-ci et frappez À pour l’allumer, E pour 
l’effacer. Lorsque le caractère a la forme voulue, faites O (pour 
OK). Le programme, après s’être assuré que vous ne vous êtes pas 
trompés (répondez O à ‘‘c’est sûr ?”’}), calcule les paramètres de l’ins- 
truction SYMBOL, qu’il affiche en haut à droite de l’écran, puis il 
affiche à droite le caractère redessiné. 


Ce programme nous semble présenter un double intérêt. Tout 
d’abord sa fonction pourra vous être utile. Notez les résultats qui 
vous semblent intéressants, pour les utiliser en début d’un pro- 
gramme nécessitant une redéfinition des caractères. Ceci vous évi- 
tera d’avoir à les calculer vous-mêmes. Ensuite, nous avons tenté 
d’utiliser le plus possible d’instructions graphiques : WINDOW, 
ORIGIN, INK, PAPER, PEN, PLOT(R), DRAWR, TEST, 
MOVE(R), XPOS et YPOS, SYMBOL AFTER et SYMBOL. 


2 editeur de caracteres 

iù 

5 LUSUEK Siotrt) ‘initialisation 

16 INFUT "autre caractere ':ag$: IF a%='"n'" THEN ENL 


co INEUT ‘valeur ASCI]l'zasciis IF ascir 255 THEN GOTI0 20 


50 GUSUEH 23504, ‘affiche le caractere 


725 GOSUER 4000 ‘le recopie dans la matrice 
40 CrÛ0: yc=zo °xC vec coordonnees curseur cliaotant 
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Ji ° 


02 a$=INKEYS 


60 I 
70 I] 


45 GOSUE 1000 allume le curseur en x“c.yc 


traitement des commandes 

240 est la fleche vers haut,241 est la fleche vers bas 

242 est la fleche vers gauche. 24% est la fleche vers gauche 
sous-programme 13500 efface curseur clignotant 


LA 


F a$=CHR$ (240) THEN GOSUB 1500: yc=yc+1: GOSUB 1000 
F a$=CHRK$(241) THEN GOSUR 1500: yc=yc-1i: GOSUR 1000 


80 IF a$=CHR$ (242) THEN GOSUR 1500: xc=xc-1: GOSUR 1000 


90 I 
91 ” 
92 

95 

74 

95 

79 

100 
110 
120 
121 

122 
123 
1350 
130 
140 
145 
146 
147 
148 
150 
151 

LS 
1 ét) 
170 
171 

172 
L73 
1/74 
A de 
180 


190 
200 
205 
206 
210 
211 
Pa 
2135 
214 
210 
216 
217 
997 
798 
4999 
{1030 
j010 
1120 
1020 
1940 
1950 
1497 
1498 
1499 


1500 
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F a$=CHK$(243) THEN GOSUEH 1500: xc=xc+i: GOSUR 1000 


Si effacement colorier le carre pointe pas le curseur 
avec la couleur 0, puis reallumer le curseur. idem si 
allumage, mais avec couleur 2 


IF a$='"e" THEN cm=0: xm=xcs ym=yc: GOSUR 45G0: GOSUR 1000 
IF a$z'"a" THEN cm=2: xmæxcs ym=yc: GOSUR 4500: GOSUR 1000 
IF a$<>"o" THEN GOTO 50 


le caractere a ete valide 


INPUT "c'est sur':a$ verifier que c'est sur 


IF a$::"o" THEN GOTO 50 
GOSUEH 1300 ‘effacer le curseur 


FOR 1=0 TO /7:psb(1i)=O:NEXT ‘reinitialiser parametres SYMAOL 


calcul des parametres du caractere 


MOVE /75,75 positionne haut droit matrice 
FOR 1x0 TO 7 ‘de haut en bas 
FOR j=0Q TO 7 ‘de droite a gauche 
IF TESTK(O, O0) THEN psbiti, :pzb'i)ti 3 
MOVER -10,0 vers gauche 
NEXT 
MOVER 80,-10 "redescend a la ligne“ 


NE XT 


e:ecute symbol 


SYMEOL ascii,.psb(0) ,psb{(1),psbi{2).psb(i) ,psb(4),psb(5).psb(4), 
psb (7/7) 


GOSUR 5500 ‘affiche le caractere 

FOR 1=0 TO 7 “affiche les parametres 
FRINT #1,psb(i) 

NEXT 

GOTO 10 demande un autre caractere 


allume le curseur clignotant 


cure=xc: GOSUR 2000: xec=cur sp en 2000 force le curseur 
cur=yc: GUSUER 2000: yc=ceur ‘dans la matrice 

MOVE 1Okxkc+5, 10kyc+5 

ancien=TESTK(0,0) memorise la couleur du carre 


FLOTR 0,0,3:PLOTR 1, 1: PLOTR -i1,0:PLOTR 1, -1 ‘4 points curseur 
KE TURN 


efface le curseur clignotant 


FLOT j04xc+5.10#yc+5,ancien 


1510 
J20 
1997 
1798 
19997 
2900 
2010 
2020 
1497 
2498 
349$ 
2300 
ie s En 
Z520 
End 
2540 
3997 
770 
3779 
4000 
4010 
4020 
4030 
4055 
4040 
4050 
4960 
go 70 
4080 
4497 
4343989 
CDS 
4500 
4510 
45.0 
49%6 
4997 
4998 
4999 
5000 
5010 
8020 
3030 
5040 
9050 
S060 
51070 
2080 
5090 
ou9s 
5099 
9100 
3119 
gi20 
IR 
7998 
7939 


PEUT Lsels 'PEDIÉ ST; 0$ FÉUDTER:- E4°71 


RE TURN 
torce le curseur dans la matrice 
IF cur<0O YMHEN cur=0 


IF cur:7 THEN cur=7 
RE TURN 
* affichage du caractere en mode graphique 
TAGS -PLOT(=S5, 5% 1 ‘ecriture sous graphique, encrier ii 
MOVE 129,47 "curseur.g haut gauche caractere 
ascii=INT(asci1) si valeur fournie incorrecte 
FRINT CHK#(asci1);: ‘affiche caractere 
TAGOFF: RETURN 
recopie caractere dans matrice 
CLS #t: MOVE 120,32 curseur.g bas gauche caractere 
FOR ymeo TO 7 de bas en haut 
FOR xm=0 TO 7 de gauche a droite 
IF TESTR(Q,0)=1 THEN cm=2 ELSE cm=0 
a=XF0S:b=YPOS ‘ memorise pasition c.graphique 
GOSUER 4500 ‘recopie dans matrice “m.ym couleur cm 
MOVE a+2,b "taille pixel = =: pas 
NEXT 
MOVER -16,2? ‘ligne au dessus 


NEXT: RETURN 


colorier ur carre de la matrice xm.ym avec couleur cm 
FOR k=z2 TO 8 STEF 2 


PLOT 10%kxkm+2,10%Xym+k.cm: DRAWR 6,0 
HE4xI: RETURN 
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initialisation KAMKANALAXARX 


MODE 1:INK O,1:INK 1,24:INK Z,.6:INKH 5.26,0 ‘mode et couleurs 


WINDOW #0,1,20.1,25 "fenetre Ü a gauche ecran 
WINDOW #1,26,40,1,9 “fenetre 1 a droite haut ecran 
ORIGIN 400,160,400,540, 280,160 ‘fenetre graphique 

FAFER #O.O: PEN #O,1:PAPER #1.0:PEN #1,2 ‘couleurs texte 
DIM psb(7) a ‘table parametre SYMEOL 

FOR 1=0 T0 8 ‘trace de la matrice 


PLOT 10%1,0,1:DRAWR 0,80 "verticales 
PLOUF OQ,10%:1 : DRAWR 80,0 ‘horizontales 
NE x I! 


"reservation memoire caractere uniquement s1 ier lancement 
INFUT "lier lancement": a$ 

IF a$<:"o" AND a$<>"n" THEN GOTG 5100 

IF a$='"'o" THEN SYMEROL AFTER © 

RETURN 
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Relief 





Le dôme de la cathédrale de Florence, le toit des pagodes chinoises 
ou celui de votre future maison, voici ce que ce programme se pro- 
pose de dessiner, si vous connaissez les équations de ces surfaces. 
Vous pouvez bien entendu l'utiliser si vous avez suffisamment 
d’intuition et de sens artistique. 


Une fois chargé, le programme vous demande d’écrire l’équation de 
la courbe. 
Si vous répondez :  - sin(2*x) * sin(2xy) 
hauteur : 89 (donne le relief à la courbe) 
largeur : 399 (définit la perspective) 
pas de x: 2 (définition horizontale) 
pas de y: 1 (définition en ‘‘profondeur’’) 


vous obtenez la courbe suivante : 
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1 AXKXRARRARAAANX 


F XRELIEFS* 

si LERRTSTESETLISLLS 

a : 

5 GOTO 700 * depart du programme 

a mn mu /eu ae EC un Cet ne us un mu on Ann men CUS ins en Ge en ns 2e Ce ee ue ms GES Sn ms Ce en me Om 2 nn se 2e cu Gen ee un S DES 420 mu ro te ne nm mn en ee ne um <a 
o calcul des coordonnees graphiques 
On — — — — —— 

20 FOR j = h TO y STEP py ” boucle sur 1'ordonnee 
30 ÿ = ay + (1-h)xdy à y de ay a by 

40 10 = (i-hi#ir/iy j origine graphique de 
60 FOR 1 = O TO id STEF px d boucle sur l'abscisse 
70 11 = 1 +10 + xorig abscisse graphique 
80 # = ax + 1xkd» d abscisse reelle 

= : 

90 z = FN f(x,.y) : fonction 

. 

100 k = y + h&z : ordonnee graphique 
110 GOSUER 200 LÉ affichage ( 11 . Fr ) 
120 ak = k " ancien k 

130 NEXT 1 

140 NEXT ) 

Lo? 

160 RETURN 

188 : 

89 2 — — 
190 affichage ( 11 , k ) 

191: essesess— 


200 IF kK = mx(1i1) OK i=1l» GOTO 225 * point invisible 
205 IF kK < mn(i1) THEN PLOT 11,Kk.3 autre cote de la courbe 


210 GOTO 240 * couleur 3 

220 © 

22e PLOT'LISKRe point visible : couleur © 

2307 

LR 

240 IF 1:lx THEN kKk=ak-pxily/ir 

245 

250 FOR t = 1 TO px ” mise a Jour de mrx(t) et mnit) 

AOÛ LE LL — px + ” entre 2 points 

270 IF t1 := O©O THEN mxit1) = MAX(ak+(k-ak)xt/prx.mx (t1)) : 
mnit1i) = MIN(a+F+(k-ak)xt/px:.mn{(t1)) 

280 NEXT t 

“it 

290 RETURN 

489 ee ————————————— ——— —— — — — —— 

490 * initialisation 

491 DD =iiéins mere (de ms 20 em ren (os 

JO0 INK O,16 :INK 1,6 ” O:rose i:rouaqe 

JO0S INF 2.2 =: INK 3.24 * Z:bleu Z:Jaune 

510 WINDOW #1.1,40,.1,2 

JL © 

930 MODE 1 :PAPFER #h1.0 * fond rose 

OS RORDER © :PEN #1. " bord noir.encre rouge 

540 © 

990 CLS 

960 DIM mx (640) ,mn(640) ” maxima et minima 

CH ALr ? 

980 ax=OQ : bx=FI " extremites axe des » 

990 ay=0 : by=FI * extremites axe des y 

6800 haut=350 * hauteur 

602 lara=550 1xnriqg= (640-1l4arQ) /2 ‘ larqeur de l'ecran 


605 FOR 1z=1 TO 640: mnt1i)=400 :NEXT 1 

610 ” 

620 INFUT #1, "Hauteur (1 a 174)".h :1IF h <1 OR h :17/74 GOTO 4625 
650 INFUT #1.'"Larqgeur (1.a 549)",l»s31F l1»x<1 OR 1»::549 GOTO 650 


4] 


540 


INPUT #1,"Fas de x (1 a 100)",px:1F px<i OR px>100 GOTO 640 


650 INPUT #1,'Fas de y (1 a SO)",py:1F py<1 OR py> 50 GOTDO 650 
SS CLS #1: PRINT #1:FRINT#1," RELIEF". 

660 1r = larg - 1» * largeur restante 

662 1y = haut -h * hauteur restante 

665 * 

6870 dx =(bx-ax)/1y» * pas reel de » 

672 dy =(by-ay)/(1y-h) * pas reel de y 

673.7 

680 id = 1» + pyklr/ly 

6885 * 

686 RETURN 

OOT. ES 

690 Depart du programme 

691 | 

700 KEY 138.CHR$(13)+"750 def fn fx,y) = " * touche ‘.°’ redefinie 
705 KEY 139,CHR$(12)+"run 740"+CHRS$ (13) * touche enter redefinie 
710 CLS :PRINT:PRINT:PRINT" RELIEF "=: FRINT 

720 PRINT " appuyez sur ‘.'(de droite)" 

722 FRINT ‘puis definissez la courbe ‘ 

724 FRINT ‘et appuyez sur enter (petit)" 

730 END 

ul... eme Nouveau depart —---------—- 

740 ON ERROR GOTO 1000 

750 DEF FN flx,y) =-SIN(2Kkx) "24SIN(y) 

760 GOSUR 500 * ainitialisation 

rt Did 

780 GOSUR 10 * calcul et affichage 

785 ” 

790 KEY 138."." : KEY 13%9.CHRS$ (13) 

795 ? 

800 WHILE INKEY$="" :WEND : END 

810 ”? 

820 

PDO —— 

991 cas d'erreurs 

992  —-——_—_—_—_———— 

1000 CLS : CLS #1 

RAPIX DS 

1030 

1050 IF ERR <> 6 AND ERR <> 11 GOTO 1100 

1060 FRINT #1,"la fonction genere une erreur de calcul dans 

l'intervalle” 

1070 PRINT #1," x =: "“saxs" — "sbx 

1080 PRINT #1," y =: "says" — “":by 

1090 END 

1100 PRINT #1.'"1] y a une erreur ":ERR:" a la ligne ":ERL 
1110 END 

Commentaires 


Les lignes 709 à 739 redéfinissent les touches [.] et [enter] 
du pavé numérique. L’utilisateur du programme réécrit en fait la 
ligne 759 et lance le programme à la ligne 74ÿ. 


Les matrices mx (649) et mn (649) (ligne 569) représentent les 
maxima et les minima utiles au calcul des parties cachées et à celui de 
l’envers de la surface. 
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Le sous-programme 19-169 est le cœur du programme. Il utilise le 
sous-programme 199-289 pour dessiner, ou non, le point qu’il a 
calculé. 


Variations 


Les limites sur les axes x et y sont fixées arbitrairement aux lignes 589 
et 599. Il est possible de modifier ces lignes pour demander à l’utili- 
sateur de choisir lui-même le champ de définition de la surface. 


Pour remplir pleinement l’écran sans risque de débordement, il fau- 
drait faire un premier calcul qui détermine le point le plus haut de la 
courbe. La fonction f(x,y) sera alors multipliée par un facteur qui 
ajuste cette courbe aux limites de l’écran. 





Il peut être intéressant, une fois le dessin achevé, de garder sur cas- 
sette ou sur disquette la mémoire écran (adresse &CY99 à &FFFF) 
pour ne pas avoir à recalculer tous les points si vous voulez réaffi- 
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cher une courbe ou si votre talent risque d’inquiéter Vasarely. Il 
suffit pour cela d’ajouter la ligne suivante à votre programme : 


785 SAVE ‘‘! image”, B, &CY90, &3FFF 


Grâce au point d’exclamation, aucun texte ne sera écrit sur votre 
écran qui ne contiendra que la courbe tracée. A cause du même point 
d’exclamation, aucun dialogue ne sera établi avant l’enregistrement. 
Il vous faudra donc mettre le magnétophone sur la position ‘‘enre- 
gistrement”” avant de lancer le programme. L’image est restituée par 
la commande suivante : 


LOAD ‘‘! image”? 
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Chapitre II 
Plein les oreilles ! 


Introduction 





Un son est une vibration de l’air ressentie, avec plus ou moins de 
plaisir, par l’oreille humaine ou par une oreille animale. 


La membrane d’un haut-parleur produit les vibrations acoustiques 
nécessaires si on lui soumet des vibrations électriques. C’est au géné- 
rateur de signaux AY-3-8912 que revient la tâche de fournir les 
vibrations électriques à partir des commandes données par le micro- 


processeur. 
Pi 0 DRE 




















générateur 
de signaux 
AY-3-8912 


commandes Vibrations 








micro- 


processeur (oreille) \ ; 







électriques 





vibrations 
acoustiques 


Du microprocesseur à l’oreille. 
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L’Amstrad produit en fait bien plus de services que le schéma 
ci-dessus ne le laisse prévoir. En effet, il peut commander trois voies 
(ou canaux) indépendantes, préciser leur fréquence, volume, durée, 
variation de fréquence et de volume dans le temps. Il peut aussi 
mixer à chaque canal un son aléatoire (bruit). Il peut enfin synchro- 
niser tous les canaux pour éviter une certaine cacophonie. 


Et tout cela est fait sans perte excessive de temps, grâce aux systèmes 
de mémorisation des notes et d’interruption sur fin d’exécution. 


prise jack 


né 
générateur Voie L 
de Q | voie 2 f Stéréo 


signaux 


mono 


haut-parleur 
de l’Amstrad 





volume 


Les trois voies du générateur. 


Les possibilités énumérées peuvent sembler superflues mais nous 
sommes très loin du gadget. En effet, pour le prix d’un micro- 
ordinateur, l’ Amstrad peut devenir un ‘‘synthétiseur”’? si ce que l’on 
attend de ses services est précisé avec soin. 


La commande SOUND 





Cette commande est la principale directive de génération d’un son. 
Sa syntaxe est la suivante : 


SOUND ind.canaux, période, durée, volume, env.vol, env.ton, bruit 


Les deux premiers paramètres, ind. canaux et période, sont les seuls 
obligatoires. 
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Nous allons détailler chacun des sept paramètres de la commande 
car leur compréhension permet une utilisation simple et efficace du 
générateur de son. 


‘“‘Ind.canaux”’” est l’indication sur les canaux. Sa valeur est la somme 
des valeurs qui suivent selon l’effet recherché (il s’agit en fait de 
positionner les huit bits d’un octet). 


1 : Son sur le canal A 
2 : Son sur le canal B 
4 : Son sur le canal C 
8 : Le son attend que le canal A soit activé pour démarrer 
16 : Le son attend que le canal B soit activé pour démarrer 
32 : Le son attend que le canal C soit activé pour démarrer 
64 : Le son attend une commande RELEASE sur les canaux cités 
(1, 2, 4) pour démarrer 
128 : Le son détruit les sons en attente sur les canaux cités et est 
exécuté immédiatement sauf s’il y a des rendez-vous 
(8, 16, 32) ou une attente 


Tout ceci paraît bien compliqué à première vue, mais il n’en est rien. 
Quelques exemples vont nous permettre de comprendre ce qui se 
passe. 


Exemple 1 


SOUND 1,200 
Le son de période ‘‘299°° est exécuté sur le canal A. 


Exemple 2 


SOUND 5,200 1+4=5 
Le son de période ‘‘290”° est exécuté sur les canaux A et C. 


Exemple 3 


SOUND 17,200 


1, + 4 
SOUND 10,300 D. 


= 17 


6 
8 10 


La première commande dit au canal A (1) d’attendre le canal B (16) 
pour jouer la note ‘‘29ÿ’’. 


La deuxième commande ordonne au canal B (2) d’exécuter la note 
‘399? et de libérer en même temps le son ‘‘29@°° qui patientait sur le 
canal A. 
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Notons que si A a rendez-vous avec B, B doit avoir rendez-vous avec 
A pour que les deux canaux puissent jouer. 


Exemple 4 


SOUND 69,200 1 + 4 + 64 = 69 


Les sons sur les canaux A et C (1 + 4) attendent un ordre RELEASE 
(64) pour démarrer ensemble : 


RELEASE (5) ou RELEASE (1) 
puis RELEASE (4) 


Exemple 5 


SOUND 17,200 14 4 16. 17 


Cette commande ne génère aucun son car le canal A a rendez-vous 
avec le canal B (cf. exemple 3). 


Si nous donnons maintenant l’ordre 


SOUND 129,300 1 + 128 = 129 


la commande précédente de période ‘‘29@”° est ignorée et le son de 
période ‘‘399°° est exécuté sur le canal A. 


Exemple 6 
Une utilisation des canaux : le timbre d’un instrument de musique. 


Un son possède rarement une fréquence unique (la fondamentale). 
Les vibrations de fréquence multiple de la fondamentale, appelées 
les harmoniques, constituent le timbre du son. 


volume (dB) 








fondamentale 


harmonique 2 





harmonique 1! 





fréquence (Hz) 





448 880 1760 


Une fréquence fondamentale et deux de ses harmoniques. 
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En générant la fondamentale sur le canal A et les harmoniques 1 et 2 
sur les canaux B et C, nous pouvons reproduire des sons plus ou 
moins riches en harmoniques et nous rapprocher ainsi de tel ou tel 
instrument de musique. 


Voici un programme qui génère un son avec des harmoniques : 


10 SOUND 33,284 7 1+32=35 : le canal À attend le canal C 

Z2O SOUND 54,284/2 ° 2+352=54 : le canal KE attend le canal CL 

30 SOUND 28,284/4 * 4+8+16=28 : le canal C libere les autres 
canaux et les trois voies jouent au meme moment. 


‘““Période”’ 
Cette valeur détermine la hauteur de la note. Elle est reliée à la 
fréquence par la formule: 


_ 125000 


fréquence 


‘‘période”’” 


Voici un programme qui émet les sons des gammes chromatiques à 
partir du do (‘‘période’”” = 3822) le plus grave : 


16 div = 2 7 (1/12) 

20 periode = 3822 

30 FOR i = ©O TQ 100 

40 note = i MOD 12 

90 IF note=i OR note=3 OR note=6 OK note=8 OR note=it GOTUDU 71 
60 SOUND CINT(periode).,50 

70 periode = periode / div 

80 NEXT :i 

90 END 


Il suffit d’éliminer la ligne 59 pour entendre tous les demi-tons 
(do dièse, ré dièse, fa dièse, sol dièse, la dièse). 


‘““Durée”” 

Ce paramètre fixe la durée de la note avec une unité de dix milli- 
secondes (un centième de seconde). S’il est absent de la commande 
SOUND), la note est exécutée pendant Ÿ,2 seconde. 


Si ‘‘durée”” vaut Ÿ, la note est jouée pendant le temps de l’enveloppe 
de volume (voir plus loin). Une valeur négative de ‘‘durée’”” repré- 
sente le nombre de fois où l’enveloppe est répétée, identique à elle- 
même. | 
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Exemple 1 


SOUND 1,200, 100 


Son de 1 seconde (100 x 10 ms) 


Exemple 2 
ENV 15. st: 1%, 200 * cette enveloppe dure 
SOUND 1,200,0,0,15 * son de 2 secondes fixe par 
l'enveloppe 135 
SOUND 1,200,-3,0,13 * son de 6 (3542) secondes 
,, 
‘“Volume 


Le paramètre volume donne une valeur de volume dans l’échelle 
9..15. C’est cette valeur qui détermine la valeur initiale de l’enve- 
loppe de volume, si elle existe. 


‘“Env.vol”? 

‘““Env.vol’’ est un numéro d’enveloppe de volume compris entre Ÿ et 
15. La valeur Ÿ, ou l’absence de valeur, correspond à une enveloppe 
prédéfinie prise par défaut (volume constant). La commande 
SOUND dispose donc en permanence des enveloppes auparavant 
décrites par les commandes ENV (voir plus loin). 


‘“Env.ton’’ 

‘“Env.ton”’ est un numéro d’enveloppe de ‘‘période’” compris entre 
@ et 15. La valeur Ÿ, ou l’absence de valeur, correspond à une enve- 
loppe sans variation de fréquence. 


‘Bruit’? 

Ce paramètre, compris entre Ÿ et 31, permet de mixer une fréquence 
aléatoire au(x) canal(canaux) cité(s) dans le premier paramètre de 
SOUND. 


L’enveloppe de volume 


Cette notion correspond à une approche plus fine de la durée et du 
volume. En effet, le volume d’une note varie pendant l’exécution de 
cette note. Il y a en général trois phases qui sont représentées sur la 
courbe ci-dessous. 
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volume 
initial 


volume 


attaque maintien relaxation 





Forme type d’une enveloppe. 


Une attaque franche convient bien pour un instrument à cordes alors 
qu’un volume à peu près constant simule correctement un instru- 
ment à vent. Cependant, toute courbe étant autorisée, il est possible 
de créer des sons originaux. 


L’Amstrad permet de dessiner approximativement cette enveloppe 
de volume grâce à cinq droites au maximum. La directive BASIC 


est : 


OÙ : 


ENV numenv ,P1,VI,T1 ,P2,V2,T2 ,.…. 


numenv est un numéro d’enveloppe compris entre 1 et 15. Cela 


Pi 


Vi 


permet de constituer une bibliothèque d’enveloppes que la 
commande SOUND peut utiliser en modifiant unique- 
ment son cinquième paramètre, env.vol. 


est le nombre de pas à l’intérieur du i*"* segment de droite 
(section). Pi est compris entre Ÿ et 127. Une valeur nulle 
maintient le son au niveau constant Vi pendant le temps 
Ti. Cette valeur nulle est donc à déconseiller car elle crée 
des discontinuités de volume. 


est la variation unitaire de volume comprise entre — 128 et 
+127. Il faut remarquer que le volume varie en réalité 
entre les niveaux Ÿ et 15. Les valeurs de Vi donnant pour 
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résultat un volume total hors de cette zone (9 à 15) produi- 
sent en fait un volume ramené à cet intervalle par le reste 
de la division du volume par 16. Ces valeurs ‘‘hors zone”’ 
créent de brusques variations de volume qui intéresseront 
les amateurs de sons étranges. 


Exemple 

Si le volume initial est à 6 et si V1 vaut 12, le volume cal- 
culé est 18 et le volume réel est 2 (reste de la division de 18 
par 16). 


Ti est le temps de chaque pas à l’intérieur d’une section. Ce 
temps est compris entre Ÿ et 255, avec une unité de 19 mil- 
lisecondes. La valeur Ÿ indique en fait la valeur maximale 
(2,56 secondes). 


Un exemple d’enveloppe de volume : 


10 ENV 12 ,4,2,10 
20 SOUND 1,284,50,3,12 


volume 


temps 





Exemple d’enveloppe de volume. 


Le volume passe d’un niveau 5 à un niveau 11 pendant 9,4 seconde, 
en quatre étapes. 
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Le volume initial d’une enveloppe est celui donné par le quatrième 
paramètre de la commande SOUND, augmenté de la valeur VI. Il 
est conseillé de le fixer à Ÿ pour ne pas dépasser un volume de 15, à 
moins que l’on recherche des effets spéciaux. 


Un dernier point à préciser est que le temps total de l’enveloppe 
T1xP1 + T2*xP2 + … 


doit être inférieur à la durée de la note (troisième paramètre de 
SOUND). 


Dans le cas contraire, une partie de l’enveloppe ne servirait à rien. 





volume 
T1xXPI1 T2 x P2 T3 x P3 
#9 à ——+ 

partie le volume 

inutile se maintient 

Dour la sur le 

note ] dernier point 
pour la 
note 2 

VIXPI 


temps 
durée de la note 1 


durée de la note 2 


Enveloppe commune à deux notes de durée différente. 


Il existe, pour les connaisseurs, une possibilité de commander direc- 
tement le générateur de sons AY-3-8912 par l’intermédiaire de ses 
registres R11 à R13 : 


ENV numenv, =R13,R11-RI12 
Exemple 


ENV 3 , =12,11 
SOUND :1,:100,200,15,3 
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L’enveloppe de période (de tonalité) 


Lorsque le contrebassiste fait trembler le doigt qu’il appuie sur la 
corde, la note produite voit sa fréquence varier au même rythme. Il 
s’agit d’un phénomène de vibrato que l’ Amstrad peut reproduire par 
la commande d’enveloppe de tonalité : 


ENT nument, P1,G1,T1 ,P2,G2,T2 … 


Les paramètres Pi et Ti sont définis de la même façon pour les com- 
mandes ENV et ENT. Pi peut prendre les valeurs @ à 239; Ti les 
valeurs Ÿ à 255. La valeur Ÿ pour Ti correspond à 256. 


Les valeurs Gi représentent les variations de la ‘‘période de 
tonalité””’. Ces valeurs sont comprises entre — 128 et 127. 


Le numéro d’enveloppe ‘‘nument”” est compris entre 1 et 15 ou entre 
— 15 et — 1. Si ce numéro est négatif, l’enveloppe se répète, identi- 
que à elle-même, pendant l’exécution du son. 


Les deux exemples qui suivent vont nous aider à comprendre la 
manière de générer des enveloppes de période. 


Exemple 1 
ENT. 11,3 5,2,2 ; S,-2;2 
SOUND 1,300,50,,,11 


La commande ENT définit l’enveloppe suivante : 


variation 
période 


20 


temps 
2086 ms durée de la note : 588 ms (1/2 s) 


Une enveloppe définie par ENT. 


La fréquence varie uniquement au début de la note, ce qui ne consti- 
tue pas un réel phénomène de vibrato. 
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Exemple 2 


ENT -—11 , 5,2,2 , S,-2,2 
SOUND 1,300,50,,,11 


La seule différence, maïs de taille, avec l’exemple précédent est le 
signe moins sur le numéro de l’enveloppe (— 11). Ce signe indique 
que, lors de l’exécution de la note, le motif est répété. Le phénomène 
de vibrato est donc continu tout au long de Ia note. 


variation 
période 


29 répétition du motif 





209 ms durée de la note : 589 ms (1/2 5) 


Répétition d’un motif d’enveloppe. 


Il existe une syntaxe différente pour les enveloppes de période dont 
les valeurs réelles de périodes sont données et non leurs variations : 


ENT nument, = VI,TI ,.…. 
Exemple 2 


ENT 3 , =1000,10 
SOUND 1,100,200,15,,3 


La période ‘‘199”” n’est pas lue. Seule la valeur 1999 est utilisée. 


Remarques générales sur les enveloppes 


— Il est possible de détruire les paramètres d’enveloppe de volume 
ou de période, pour revenir à leurs valeurs par défaut (ni variation de 
volume, ni variation de période). Il suffit pour cela d’écrire : 


ENV numenv 
ou ENT nument 


— Si le temps vous manque pour réfléchir à ces problèmes d’enve- 
loppe, vous pourrez générer automatiquement une bibliothèque 
d’enveloppes grâce aux programmes proposés à la fin de ce chapitre. 


2) 


Siffler en travaillant : SQ ( ) 





Ce titre signifie que l’ Amstrad, lorsqu’il fait de la musique, peut 
poursuivre un tout autre travail. 


Cela est dû au fait que le microprocesseur est aidé dans sa tâche 
musicale par le coprocesseur spécialisé AY-3-8912. 











SOUND micro- commande 


processeur 






coprocesseur 
musical 





événement 









SOUND 


le microprocesseur est libre travailler 


e faire autre chose pendant 
l'exécution de la note 






micro- 
processeur 
commande 
X siffler 
note 
coprocesseur 
temps 


Relation entre coprocesseur et microprocesseur. 


Par exemple, si vous demandez un son de vingt secondes par 
SOUND 1,284, 2000 


le message ‘‘Ready”’ apparaît tout de suite et vous continuez à enten- 
dre le /a international même si vous faites un ‘‘list’”’ ou toute autre 
commande (excepté un SOUND 129,9). 


Le microprocesseur n’attend donc pas la fin de la note pour exécuter 
une nouvelle instruction, et continue à travailler pendant les vingt 
secondes durant lesquelles la note est jouée. 


Mais l’Amstrad ne s’arrête pas là pour autant. 


Que se passe-t-il lorsque deux sons doivent être joués sur le même 
canal, l’un à la suite de l’autre ? 


10 SOUND 1,284,2000 
20 SOUND 1,400,2000 
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A la lecture de la première commande, SOUND ‘‘284””, le micropro- 
cesseur demande à son coprocesseur musical de jouer la note ‘‘284’”, 
et ce dernier s’exécute immédiatement. 


Le BASIC trouve ensuite à la ligne 29 une nouvelle commande pour 
le même canal. Or ce canal est occupé à jouer la note ‘‘284”’. Le 
microprocesseur, sachant cela, va mettre en file d’attente la 
deuxième note (‘‘499°°). 


m A 


A 


, 


A 





u/ 
ù 
ah 
le coprocesseur joue SOUND‘‘284"" SOUND:‘499"" 
pour SOUND‘‘284”’ attend son tour 


File d’attente devant le coprocesseur. 


Pendant ce temps, le microprocesseur est libre de vaquer à diverses 
occupations. 


Lorsque SOUND ‘‘284’” a fini de faire travailler le canal 1, le copro- 
cesseur regarde s’il y a un autre client, un autre son à émettre, sur le 
même canal. Il s'aperçoit que SOUND ‘‘499”° attend son tour. C’est 
donc lui qui va faire jouer le coprocesseur pendant que le micropro- 
cesseur est toujours libre de ses gestes. 


Une fois SOUND ‘‘4ÿ@”° satisfait, le coprocesseur regarde à nou- 
veau s’il lui reste un client à servir. Or il n’y a plus de SOUND en 
attente. Le coprocesseur peut donc dormir jusqu’au prochain 
SOUND. 
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le microprocesseur 
travaille 


le coprocesseur 









« Partage du travail ! » 


Ce système est valable pour les trois canaux. Sur chaque canal, il 
peut y avoir au maximum un son en cours d’exécution et quatre sons 
en attente. Nous rappelons que les trois canaux ont pour numéro 1, 
2 et 4 et non 1, 2 et 3. 





SOUND SOUND 
exécuté en attente 


Files d’attente devant les canaux. 
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Le programme suivant met en évidence le système de file d’attente : 


10 d=20Q0 * duree : Z secondes 

20 FOR i=i TO 5 * cinq sons pour le canal 1 
se) SOUND '1,10%1i.d 

40 PRINT :i 


90 NEXT :i 
60 PRINT "fin" 
70 END 


En augmentant, à la ligne 29, la valeur extrême de la boucle, nous 
vérifions que le microprocesseur ne peut mettre en attente plus de 
quatre sons sur un canal. 


Il existe trois variables que l’on peut interroger pour connaître l’état 
des trois canaux. Ce sont SQ(1), SQ(2), SQ(4). S et Q sont les initia- 
les de SOUND QUEUE, file d’attente de sons. 


Les trois variables SQ sont des octets ainsi disposés : 








nombre de places 


| libres sur le canal 
état de rendez-vous du ‘‘SOUND”’ 
en tête de la file d’attente 
vaut 1 si le son attend un ordre 
RELEASE pour démarrer 
vaut 1 si le son est en cours 
d’exécution 


Exemple 1 


10 SOUND 1,284 

20 FRINT SQ(1),S0(2).S0(4) 
RUN 

132 4 4 


La valeur 128 (132 = 128 + 4) sur le canal 1 montre que celui-ci 
exécute une note au moment du ‘‘PRINT”’. 

Les valeurs 4 (132 = 128 + 4) restantes indiquent qu’il reste quatre 
places libres sur chaque canal. 
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Exemple 2 


10 SOUND 17,284 * 17zi+16 : le canal À a rendez-vous avec 
le canal R 
20 SOUND 10,300 ? 10=2+8 : le canal BH a rendez-vous avec 


le canal À 
30 PRINT SQ(1),SQ(2).S0(4) 
RUN 
132 132 4 


Les canaux A et B sont occupés et il reste quatre places libres sur 
chaque canal. 


Exemple 3 


10 SOUND 1,284 
20 PRINT SQ(1),50(2),50(4) 
30 SOUND 1,400 
40 PRINT SQ(1),SQ(2).SQ(4) 


RUN 
32 4 4 
131 4 4 


Lors du ‘PRINT’ de la ligne 29, il reste quatre places libres sur 
chaque canal (132 —-128=4). Le ‘‘SOUND” de la ligne 39 occupe 
une place dans la file d’attente et il ne reste plus que trois places sur 
le canal A lors du ‘PRINT’ de la ligne 4ÿ. 


Exemple 4 


10 SOUND 685,284 65 = 64 + i 
20 FRINT SQ(1) 

30 RELEASE (1) 

40 PRINT SQ(1) 

RUN 

67 


132 


Le son, généré par la ligne 19, attend une commande de déblocage 
(64). Il ne reste donc plus que trois places libres (64 + 3 = 67). 


La ligne 39 libère le canal A. Ce canal peut donc jouer (128). Les 
quatre places de la file d’attente sont alors libres (128 + 4= 132). 
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Prévenez-moi s’il reste une place : 
ON SQ() GOSUB... 


Le système des files d’attente est bien pratique lorsque le nombre de 
notes à jouer n’est pas très élevé. Au-delà, le microprocesseur est 
bloqué et ne peut exécuter autre chose. 







e* £<? le microprocesseur 
JS JL attend que le son 6 
% ®$ puisse entrer dans 

la file d’attente 


Six notes en attente devant le canal 1. 


Heureusement, il existe un système qui permet de prévenir le micro- 
processeur chaque fois qu’il reste une place libre dans la file. La 
commande BASIC qui active ce système est : 


ON SQ() GOSUB ligne 1 = 1, 2ou4 


Il suffit donc que le sous-programme appelé mette le son ‘‘6’’ en 
attente dans la file et réactive le mécanisme par un nouvel ordre 
“ON SQ(i) GOSUB’’. 


Il existe bien entendu l’équivalent pour les canaux 2 et 3 (ON SQ(2), 
ON SQ(4)). 


Il est important de noter que les commandes SOUND, ainsi que le 
passage dans le sous-programme appelé, désarment le mécanisme 
d'interruption en cas de place libre dans la file d’attente. Il est donc 
obligatoire, s’il reste des notes à jouer, de mettre une commande 
ON SQ() à la fin du sous-programme ou dans le programme princi- 
pal. | 
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Exemple 1 


10 GOSUB 100 


20 WHILE jamais = O ” boucle sans fin 

30 PRINT "J'ecris et je joue de la musique en meme temps" 
40 WEND 

60 ” 


100 SOUND 1, 50+INT (RND (6) #1000) ? sous-programme musical 
110 ON SQ(1i) GOSUB 100 
120 RETURN 


L’appel du sous-programme 199 à la ligne 19 active le premier son 
aléatoire. Le sous-programme est relancé (ON SQ(1) GOSUB 1999) 
dès que la file d’attente du canal A n’est pas pleine, c’est-à-dire tout 
de suite. Ce mécanisme est répété pour les cinq premières notes. Il y 
a ensuite retour à la ligne 39 qui affiche, indéfiniment, son message. 
Cette boucle est interrompue de temps en temps, lorsqu’une place se 
libère dans la file d’attente. 


Exemple 2 

10 MODE 2 : CLS 

20 ?” execution ‘“simultanee" d’un programme et d’une gamme 
DO: RER RSS SSSR RSR SRE MERE SSSR SSSR es eRe e 
40 ” 

= | e JR 

60 MODE 2 : CLS 

70: ? 

80 GOSUB 250 * lancement de la gamme 

L'4 5 JS 

100 ? 

110 DIM pascal(10,10) : pascal(0,1)=i 

120 ? 

130 FOR i = 1 TO 10 *” triangle de pascal 

140 FOR j = 1 TO i 

150 pascal(i,j) = pascal(i-1,j-1) + pascal(i-1,;) 

160 PRINT USING "####" ; pascali(i,j) : 


17Q NEXT )j 
180 PRINT 
190 NEXT : 


200 END 

210 ? 

220 

230 ‘ sous-programme musical) 

240 7 ==—“““mm—-—_—m_m—————— 

250 READ n.d * lecture note et duree 
260 ? 

270 IF n = —-1 GOTO 300 ” fin de la melodie 

280 SOUND 1,478/2"(n/12).50xXd 

290 ON SQ{(1) GOSUB 250 * on relance la machine 


300 RETURN 
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sos 
S20: * 


280 (DATA li ss1:5, 446.150 1,10:1,12 4, 13,13-t, 1 


Le principe de ce programme est le même que dans l’exemple précé- 
dent. Remarquons simplement qu’il y a une condition d’arrêt à 
l’appel du sous-programme musical (ligne 27%). 


Si la boucle de la ligne 139 est 
FOR i = 1 TO 2 


nous n’avons que les cinq premières notes de la gamme car le pro- 
gramme principal ne dure pas suffisamment longtemps pour être 
interrompu par la libération de la cinquième place de la file 
d’attente. 


Bibliothèques d’enveloppes 





y 


# + el 7 # ÉE] 
ume touche 5.4. 
eo mn 4 E « 


+ A OLEUE RE 
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La grande liberté de choix des enveloppes de volume et de période se 
paie par la complexité du calcul des directives ENV et ENT. Nous 
vous proposons deux programmes qui, à partir de votre dessin, cal- 
culent les enveloppes et exécutent un air de musique d’après ces 
enveloppes. Vous avez ainsi le choix des enveloppes et la simplicité 
d'utilisation. 


Vous choisissez d’abord un numéro d’enveloppe et quelques options 
dont nous parlons un peu plus loin. Les quatre flèches servent à 
déplacer votre ‘‘crayon”” sur l’écran. Une pression sur la touche 
[copy] valide un point de l’enveloppe. Lorsque tous les points sont 
positionnés (cinq au maximum), la touche [enter] lance l’exécution 
d’une mélodie et affiche la valeur des paramètres calculés. Dès que 
votre bibliothèque d’enveloppes est constituée, vous pouvez la 
conserver sur cassette et la lire ultérieurement. 


Le générateur d’enveloppe de volume vous pose les questions sui- 
vantes : 


e effets spéciaux (0o/n) ? 

Une réponse négative maintient le volume dans les limites @ à 15. 
Une réponse positive définit une plage de volume pouvant aller 
jusqu’à 127 d’après la réponse à la question qui suit. 


° répétition volume (9 à 7)? 


Cette valeur détermine le nombre de fois où le volume passera brus- 
quement de la valeur 15 à la valeur ÿ si toute l’échelle de volume est 
utilisée. 


e temps maximum en 1/199 s. (1 à 255)? 


Ce temps définit la pleine échelle de temps sur la courbe. Comme les 
notes de la mélodie ont une durée de l’ordre de 59 millisecondes, il 
est conseillé de choisir une grandeur qui ne s’éloigne pas trop de cette 
valeur. 


Cette dernière question est également posée par le générateur d’enve- 
loppe de période qui vous aura demandé auparavant : 
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° variation maximum (Ÿ à 127)? 


Plus cette valeur est élevée, plus le phénomène de vibrato est impor- 
tant, jusqu’à rendre méconnaissable la mélodie. 


e répétition (0/n) ? 


Il est possible de définir un motif qui se répète sans avoir à le dessi- 
ner tout au long de la note. 


| RRRA RSS RSR RSS SRE MSER ES TER RRSRRRSSEXLLSE 
*"* Bibliotheque d’enveloppes de volume 3x 
| LELTS LE TRE NAN TE LRE NUS SEULEMENT ALENLLSS 

OU GOSUB 3000 * anitialisation 


LU WHILE jamais = 0 * boucle ‘sans fin” 


45 CLS #1 


50 FRINT #1,"1 à 15 :Numero d’enveloppe ‘ 

mA | PRINT #1," 16 : lecture 3 17 : enregistrement ‘ 

Se INPUT #1," —1 : fin " ; numenv 

53 IF numenv = —j THEN END “Fan 

54 IF numenv<i OR numenv>17 THEN GOTO 50 

9 IF numenv = 17 THEN GOSUK 2000 : GOTO 50 ” enregistrement 

7 IF numenv = 16 THEN GOSUR 2500 : GOTO 50 ’ lecture cassette 

60 IF deja(numenv) = © THEN deja(numenv) = 1 : GOSUB 100 
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70 GOSUH 1000 VAUE. 0-0" F LE 

75 * 

80 WEND 

LE 

95 

98 definir enveloppe 

PDO OXENXENNN UT ENNEN EURE SESATENLELANXES 

100 n = numenv 

110 INFUT #1.'"effets speciaux (O/N)';a% 

115 - 

120 IF LOWERS(a$)="o" THEN INFUT #1,'repetition volume(d a /)'"';rep 
ELSE rep=0 

122 IF rep>7 OK rep«<O THEN GOTO 120 
ELSE vmax=1i6t (rep+1)-1 ” volume ma»; 

124 


temps pleine echelle 
23 INPUT #1,"temps maximum en 1/100 s.(1 a 255)":;tma: 
127 IF tmax<1 OR tmax>255 GOTO 125 


1 :Q 

140 GOSUEH 700 ” dessin abscisse et ordonnee 
150 * 

160 FRINT #1,'"f#fleches pour deplacement 

162 FRINT #1,"copy pour valider un point" 

164 FRINT #1,'"enter pour ecouter 

179% * 

180 npt = © nombre de points 

185 t = Oz: v = © * abscisse ordonnee 

190 a$ = INKEYS : IF a$ = "" THEN GOTO 190 ELSE a = ASC(a$%) 
re 

200 d = 10 : tmin = © ” deplacement curseur : non retour 
210 WHILE a <> 13 AND npt « 5 
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220 
230 
240 
250 
2860 
270 
Z80 
290 
TUO 
310 
320 
35330 
350 
560 
370 
375 
80 
3585 
TF0 
5Yd 
399 
400 
410 
420 
430 
440 
445 
450 
4860 
465 
470 
480 
485 
390 
DUC 
er à 
520 
25 
320 
D 4} 0 
545 
9930 
60 
S70 
698 
699 
700 
710 
720 
7350 
740 
980 
981 
990 
991 
1000 
1002 
1004 
1005 
1010 
1015 
1020 
10350 
1540 
1045 
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IF a=240 THEN v=v+d : v=MIN(V,330) : GOTO 550 haut 
IF a=241 THEN v=v-d : v=MAX(v,0) : GOTO 350 * bas 
IF a=243 THEN t=t+d : t=MIN(t,639) : GOTO 350 * droite 
IF a=242 THEN t=t-d : t=MAX(t,tmin): GOTO 350 gauche 
IF a<> 224 THEN GOTO 350 * copy 
MOVE tt (npt,n),vv(npt,n) 
tmin = t ? pour ne pas revenir en arriere 
npt = npt + 1 * nombre de points 
ttinpt,n) = t 2: vv(npt,n) = v 
DRAW t,vV,3 :  GOSUB 400 ‘” dessin et calcul 
PLOT at,av,O sat = tt : av= v : PFLOT t,v,2 
a$ = INKEYS : IF a$ = "" GOTO 350 ELSE a = ASC(a$) 
WEND 
RETURN 
calcul d'un point 
ÉALELXTIELALSÉLNKE 
IF npt <= © GOTO 560 
tOaztt (npt-1,n) : ti=tt (npt,n) 


vO=vv(npt-1,n) vi=vvi(npt,n) 
dt=(ti-to)/6S5S9itmar 


dv={(vi-vo) /3S3O0KXvmar»: 


delta t 
delta v 


dv = MIN (dv, vmax) volume max pleine 
: ” echelle modulo 14 
nbpas = MIN (dt,ABS(dv),126) 

nbpas = MAX (1,nbpas) pas <> 0 

nbpas (npt,.n)= INT (nbpas) 


IF nbpas« O0 THEN dv= INT(dv/nbpas) 
dv=MIN(dv, vmax):dv=MAX (dv, -vma)»:—1) 


dt=INT(dt/nbpas) 


delta(npt.n) = CINT(dv) variation volume 
dt=MIN(dt, 255) *” delta t 
IF dt=0 THEN dtz=i ? car © represente 256 
pas(npt,n) = CINT(dt) pas (sur tj) 
npt(n) = npt 
RETURN 

ar es 

ANXLXNT 
CLG : PEN 3 
MOVE 0,0 : DRAW 0,330,2 : LOCATE 1,5 5: PRINT “volume 
MOVE O,0 : DKAW 520,0,2 : LOCATE 34,25 : FRINT ‘“>temps" 
MOVE 0,0 : PEN 1 


RETURN 


> 


resultats 

| AXLXIXLÉNALÉENALLLLSX 

n numenv npt = npt{n) 
GOSUR 700 axes 


FRINT #1,"ENV ‘“s;numenv: " 


FOR 1=1 TO npt 


DRAW tt (i,n),vv(i,n),3 
PRINT #1,'",'";nbpas(i,n) 
NEXT 


PRINT #1," 
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boucle sur les points 
dessine les droites 
5", sdelta(i,n):s",";pas(i,n); 


1050 ON npt GOTO 1060,10865,1070,1075, 1080 

1060 ENV numenv,nbpas(i,n),delta(i,n),pas(i,n) : GOTDO 1100 

1085 ENV numenv,nbpas(i.n),delta{(i,n),pas(i,n),nbpas(z,n), 
delta(2,n).pas(2,n) : GOTO 1100 

1070 ENV numenv,nbpas(i,n),delta(i.n),pas(i,n),nbpasi(2,n), 
delta(2,n),pas(2,n),nbpas(5,n),delta(ïS,n),pas(ä,n) : GOTO 1100 

1075 ENV numenv,nbpasi{i,n).delta(i,n),pas(i,n),nbpas(2,n), 
delta(2,n),pas(2,n) ,nbpas(3S,n),delta(s,n),.pas(s.n),nbpas(4,n), 
delta{4,n),pas(4,n) : GOTO 1100 

1980 ENV numenv,nbpas{(i,n),delta(i,n),pas(i.,n),nbpas(2,n),. 
delta(2,n).pas(2,n),nbpas(&,n),delta(s,.n).pas(3.n) ,.nbpas(4,n), 
delta(4,n),pas(4,n),nbpas(S,n),delta(s,n).pas(s,n) 

LOS -° 

1100 RESTORE : READ p : KREAD d ° periode - duree 

1110 NAILE: bp :£2> +1 


1120 SOUND 7,p.,30/d,0,numenv * musique 
LES READ p : KREAD d 
1140 WEND 


114% PRINT #1,"une touche S.V.F,." :WHILE INKHEYS="" : WENUL 
11590 RETURN 

1160 ” 

1170 DATA 319,1 .284, 
1180 DATA 215,2 ,25 
1300 DATA -1.-1 

1980 

1981 

1990 ‘enregistrement 
14 UE 

2000 CLS : INPUT #1, "Enregistrement (REC-PLAY) puis nom';a$ : CLS 
2010 OFENOUT a% 

201: * 

2020 FOR j = 1 TO is 

2030 FRINT #9,deja(j): PRINT #9,npt{()) 

2040 FOR 1 = 1 T0 © 


2 sels jet Le a rT0, 2 
3 


3 ER 
EEZ=E=====--=—-- 


2050 PRINT#9,nbpas(i,j):FRINT#9,deltat{i1,J) 

2055 FRINT#9,pas(1i.)):PRINT#9,tt(1,)J):PRINT#Y, VV (1,9) 
2060 NEXT 

2070 NEXT 

2075 : 


20890 CLOSEOUT 
2090 KETURN 


2480 
2490 ‘lecture cassette 
241 ‘==zzzzzz-zszszz==- 


2900 CLS : INPUT #1,'"'Lecture (PLAY) puis nom':a$ : CL: 
2510 OPENIN a$ 


JiJ 
2520 FOK 3 = 1 TO 15 
25330 INFUT #9,deja{(j): INPUT #9,npt{(3) 
2540 FOR 1 = i TO 5 
290 INPUT#9,nbpas(i,)):INFUT#S,delta(i1.)) 
Pr INFUT#9,pas(i,j):INPUT#9,tt(1.j):INPUT#9,vV (1,3) 
2560 NEXT 1 


2570 NEXT J 


2380 CLOSEIN 
2990 RETURN 


3000 DIM dejat15) .nbpas(5,1i5) , delta(S,15) , pas (5.15) 
3005 DIM tt(5,15) ,vv(S,15) ,npt (15) 


3010 INK O.,.1 : BORDER ji ” bleu fonce 
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3020 INK 1,18 ” vert vif 

3030 INK 2,26 * blanc 

T040 INK 3,6 ? rouge 

3050 MODE 1 : PFRINT CHR$(22) + CHR$(1) * transparence 
3060 * 


31070 WINDOW #1,1,40,1,4 * texte 

2080 

1090 FAPER #1,0 : CLS #1 * papier bleu fonce 
Z100 FEN #1.1 * stylo vert vif 

LS EUR 


3120 RETURN 


Le programme d’enveloppe de période (ou tonalité) est identique au 
précédent, excepté les modifications suivantes : 


RSR AS ENS SEAL SENSENELÉNLENLESANASURXÉ 
4 Bibliotheque d’enveloppes de ton * 
AXE NLENSASLUESANENLERNEENANEEXEXALESXNS 


110 INPUT #1,"variation maximum(O a 127) ";vmax 
112 IF AKS(vma;:) :127 GOTO 110 


2 INFUT #1.'"repetition (o/n)'":rep%$ 
22 IF LONERS(rep$)="o" THEN rep = -1 ELSE rep = +1 


1/3 v=it0/2Z 3 t=0 : MOVE t,v' origine au milieu 


719 MOVE 0,0 3: DRAW 0,330,2 =: LOCATE 1,5 : FRINT ‘“‘“periode" 
720 MOVE 0,330/2: DRAWR 520,0,2 : LOCATE 34,15 : PRINT ‘“>temps" 
770 MOVE 0,330/2 : PEN 1 


1005 PRINT #1,"ENT “;numenvérep;" "; 


1V47 nr = numenvirep 

1050 ON npt GOTO 1060, 1065, 1070, 1075, 1080 

1060 ENT nr .nbpas(i.n),delta(i,n),pas(i,n) : GOTO 1100 

1065 ENT nr,nbpas(i,n),delta(i,n),pasi(i,n),nbpas(z.n), 
delta(2,n) ,pas(?2,n) : GOTO 1100 

1070 ENT nr,nbpas(i,n),delta(i,n),pas(i,n).nbpas(2,n), 
delta(2,n) ,pas(2,n) ,nbpas(3,n),delta(3s,n),pas(%,n) : GOTO 1100 

1075 ENT nr ,nbpas(i,n),delta(i,n),pas(i,n).nbpas(2,n), 
delta(2,n) ,pas(2,n) ,nbpas(3,n),delta(s,n) ,pas(3,.n),nbpas(4.n), 
delta(4,n),pas(4,n) : GOTO 1106 

1080 ENT nr,nbpas(i,n),delta(i,n),pas(i,n),nbpasi(2,n), 
delta(2,n),pas(2,n) ,nbpas(3,n),delta(3,n).pas(s,n),nbpas(4,n), 
delta(4,n) ,pas(4,.n),nbpas(S5,n),delta(5,n).pas(5,n) 


1120 SOUND 7,p,20/d,153,,numenvy * musique 
3007 FOR 1=1 TO 15: vv(0,.1)=330/2: NEXT ’origine au milieu 
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TES S5 
+ 12: 
& £ 


QT 14 ‘4e *s ps i RS 
TT AUS CRE at y FA 





Variations 


— I] peut être intéressant de tracer l’enveloppe réelle et non l’enve- 
loppe dessinée par l’utilisateur (lignes 1919 à 1930). Ces deux enve- 
loppes diffèrent uniquement si l’option ‘‘répétition”” a été choisie. 


volume volume 





temps temps 
enveloppe de volume dessinée enveloppe de volume réelle 
période période 
temps temps 
enveloppe de période dessinée enveloppe de période réelle 


Passage d’une enveloppe dessinée à une enveloppe réelle. 
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— Ilest possible de fusionner ces deux programmes. Le programme 
résultant donnera la possibilité de faire varier en même temps les 
enveloppes de volume et de période. 

— Vous pouvez développer une option supplémentaire qui consiste 
à effacer une enveloppe déjà écrite mais qui ne vous satisfait pas. 
Il suffit pour cela de mettre à zéro la variable ‘‘deja’”’ (deja 
(numenv) = 6). 

— La commande du curseur peut se faire par Joystick en modifiant 
les lignes 199 à 366. 
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Chapitre III 


Les interruptions 
ou la vie d’Arnold 


La vie d’Arnold 


Arnold est employé par la société Express pour apposer des tampons 
sur les documents qui lui sont remis. Il est en liaison directe avec ses 
quatre chefs hiérarchiques par l’intermédiaire de quatre téléphones 
disposés sur son bureau. En outre, il est responsable de la sécurité. 
Une alarme l’avertit en cas de danger. 





Arnold à son bureau. 
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Lorsque la sonnerie de l’un des téléphones retentit, Arnold arrête 
son travail, prend le combiné et écoute les ordres de l’un de ses chefs. 
Il effectue le travail demandé et retourne mettre des tampons sur ses 
fiches. Il arrive que deux téléphones sonnent en même temps. Dans 
ce cas, Arnold décroche celui qui est relié au plus important des deux 
chefs. Priorité à la hiérarchie! 


Il arrive aussi qu’un grand chef appelle pendant qu’un petit chef 
demande un travail à Arnold. Dans ce cas, Arnold fait patienter le 
petit chef, effectue le travail pour le grand chef et reprend la commu- 
nication avec le petit chef. Si l’inverse arrive, la demande du petit 
chef est mise sur répondeur téléphonique puis exécutée une fois le 
travail plus prioritaire effectué. 


Ce système fonctionne bien tant que les différents ordres ne sont pas 
contradictoires. Pour éviter cela, Arnold a la possibilité de placer 
tous ses téléphones sur répondeur, lorsqu’il sait que le travail qu’il 
effectue peut être perturbé par un autre appel. 


Seul le système d’alarme, plus prioritaire que ses quatre chefs, ne 
peut laisser Arnold indifférent car, quoi qu’il fasse, il est obligé 
d’entendre la sirène. 


Les interruptions logicielles 





Les interruptions gérées par le BASIC de l’ Amstrad fonctionnent sur 
le principe des téléphones d’Arnold. Ce sont des interruptions 
logicielles, par opposition aux interruptions matérielles (voir cha- 
pitre V). Une interruption logicielle suspend le déroulement d’un 
programme BASIC pour exécuter un sous-programme dit ‘‘sous- 
programme d’interruption””’. 


Il existe trois types d’interruption : 

— les réveils, réglés par le programme lui-même, 
— |es interruptions dues aux canaux sonores, 

— Je ‘‘break’” généré par la touche ESC. 


Toutes ces interruptions n’ont pas même priorité : 
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Priorité croissante break Alarme 


réveil 3 P. _ D.G. 

réveil 2 et musique Chef de division 
réveil 1 | Chef de service 

réveil Chef de groupe 

travail en cours Arnold 


Il est possible de ne pas être dérangé par toutes ces interruptions, 
excepté le ‘‘break’””. Ces interruptions sont dites masquables. Il se 
passe alors la même chose que lorsqu’ Arnold met ses téléphones sur 
répondeur. Les interruptions sont mémorisées (enregistrées), puis 
restituées une fois les masques enlevés. Le nombre maximum 
d’interruptions enregistrées est de 127. 


Nous allons détailler les commandes BASIC qui gèrent les inter- 
ruptions. 


Ces commandes sont de quatre types : 
— demande d'interruption, 

— suspension d’interruption, 

— reprise d'interruption, 

— arrêt d’interruption. 


Demande d'interruption 

Différée 

AFTER temps (, réveil) GOSUB ligne. 

Cette commande demande que le réveil (9 à 3) appelle le sous- 
programme dont le numéro de ligne est ‘‘ligne’” après le temps pré- 
cisé. Si le numéro de réveil n’est pas donné, le réveil utilisé est celui 


de plus faible priorité (9). L’unité de temps est 29 millisecondes 
(1/59 de seconde). 


Exemple 


10 AFTER 50 GOSUR 100 * reveil apres 1 seconde 
20 

30 FOR i = 1 TO 1000 * travail courant 

40 PRINT : 

90 NEXT :i 

60 END 

Fit DR 

100 PRINT "Je suis fatigue de compter" 

110 FRINT “Appuyer sur ENTER pour que je continue" 
120 INPUT a$ 

130 RETURN 
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Périodique 


EVERY temps (, réveil) GOSUB ligne. 

Si le programme veut être interrompu périodiquement, cette 
commande lui permet de donner le temps entre deux interruptions, 
le numéro de réveil utilisé et le sous-programme à exécuter. 


Exemple 


10 EVERY SO GOSUB 100 ? reveil toutes les secondes 
20 

30 FOR i = 1 TO 1000 ? travail courant 

40 PRINT 1 

dO NEXT i 

60 END 

70 ”? 

100 FRINT ‘“J'arrete de compter un instant" 

110 RETURN 


Le programme qui affiche les nombres de 1 à 1999 est interrompu 
toutes les secondes pour écrire ‘‘J’arrête de compter un instant”’. 


Remarque 


Pour chacun des quatre réveils, il existe un compteur et un seul, 
indépendant des trois autres. Cependant, les commandes EVERY et 
AFTER utilisent le même compteur pour un réveil donné. Une 
commande AFTER ou EVERY sur le réveil i annule donc l’effet 
d’une commande AFTER ou EVERY sur le même réveil. 


Musicale 


ON SQ(i) GOSUB ligne i = 1, 2 ou 4. 

Cette commande est décrite en détail au chapitre II. Elle demande 
l'exécution du sous-programme ‘‘ligne’’ lorsque le canal i n’est pas 
plein. 
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Obligatoire 


ON BREAK GOSUB ligne 
Le ‘‘break’”” permet, normalement, à l’utilisateur d’un programme 
d’en arrêter l’exécution à tout instant. La commande ci-dessus 


contraint le BASIC à exécuter le sous-programme ‘‘ligne’’ en cas de 
‘“break”’. 


Exemple 


10 ON BREAK GOSUB 100 

er 7 

30 PRINT "Vous ne pourrez plus sortir de ce progr amme 
40 GOTO 30 

dQ ? 

60 * 

100 PRINT "Il y a bien eu break” 

110 RETURN 


à 


Attention à ce programme. Il boucle indéfiniment et rend le 
‘“break’”” inopérant. 


Suspension d’interruption 


DI (Disable Interrupt) 

Cette commande rend le BASIC ‘‘sourd’’ aux appels des quatre 
réveils. Les 127 premiers appels ne sont pourtant pas perdus et sont 
honorés dès que les interruptions ne sont plus suspendues. 


Exemple 


10 EVERY 50 GOSURH 100 

207 

30 FOR i=i TO 10000 

40 IF a$ = ‘"n" THEN DI 
90 PRINT 1 

60 NEXT i 

70 PRINT “c'est fini" 

80 END 

90 * 

100 INPUT "voulez-vous continuer a etre interrompu'";a$ 
110 RETURN 


La commande DI de la ligne 49 arrête le réveil activé à la ligne 19. 
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INPUT... 

L’appel d’un sous-programme d'interruption (réveil ou musique) ne 
peut se faire pendant qu’une commande BASIC est en cours d’exé- 
cution. La seule commande qui peut bloquer les interruptions est la 
commande INPUT car son temps d’exécution dépend de l'utilisateur 
du programme. 


En outre, le “BREAK”, pendant une commande INPUT, ne peut 
être traité par interruption et fait arrêter le programme. 


Nous vous conseillons de remplacer la commande 
INPUT a$ 


par la suite de commandes suivantes : 


a$ = "" 1 xS = “"* 

WHILE x$ <> CHR$(13) 
X$S=INKEYS : a$ = a$ + xs 

WEND 


au cas où la commande INPUT risque de désynchroniser le déroule- 
ment de votre programme. 


Reprise d’interruption 


EI (Enable Interrupt) 

ET est le pendant de DI. Nous savons que DI met les interruptions 
sur ‘‘répondeur”’. La commande EI consiste à exécuter, dans l’ordre 
d’arrivée et par priorité décroissante, les demandes enregistrées. 


ET remet le programme à l’écoute des quatre réveils. 
Exemple 


10 EVERY S0,1 GOSUB 100 

20 :” 

XO WHILE a = O© 

40 DI ” desactive les reveils 
50 INPUT a$ : i=0 

60 EI * reactive les reveils 


100 PRINT i s i=i+i ” sous-programme d'interruption 
110 RETURN 
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RETURN 
Le bien connu ‘‘RETURN'’ joue le rôle de la commande El, 
lorsqu'il termine un sous-programme d’interruption. 


Arrêt d’interruption 


ON BREAK STOP 
Cette commande annule l’effet de ‘ON BREAK GOSUB”’. 


Exemple 


10 ON BREAK GOSUEH 100 

20 FRINT ‘le premier break n’arrete pas le programme" 
40 GOTO 30 

0 ” 

100 ON BREAK STOF 

110 RETURN 


REMAIN (1) i = ÿ,1,2ou3 
À tout instant, le programme peut demander combien il reste de 
temps avant la prochaine interruption sur un des quatre réveils 


(9 à 3). 


Une réponse nulle signifie qu’il n’y a ni commande EVERY ni 
commande AFTER en cours. 


La lecture de cette information désactive le réveil 1. 


SQ(i) i = 1,2 ou 4 
Cette variable contient l’état du canal i (voir le chapitre Il). 


Sa lecture annule l’effet de la commande ON SQ(1) GOSUB ligne. 


END 
La fin d’un programme désactive toutes les interruptions en attente 
mais ne vide pas les files musicales. 
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TABLEAU RÉCAPITULATIF SUR LES INTERRUPTIONS 


réveils EVERY EI (RETURN) 
9 à 3 AFTER fin INPUT 


ON SQ( ) sous-prog. 
SQ() 

SOUND 
END 


break ON BREAK ON BREAK 
GOSUB STOP 


Voici, pour terminer, une ‘‘maxime”” et son explication : 





Un sous-programme d'interruption doit être le plus court possible. 


Arnold a un chef maniaque qui l’appelle toutes les dix minutes pour 
lui demander de classer des documents. Si ce classement se fait en 
moins de dix minutes, Arnold le fait sans problème. 


Chef l 2 3 
ordre de ordre de | ordre de 
classement 1 classement 2 classement 3 
Arnold 
classement 1 classement 2 classement 3 


temps 


Arnold a le temps de classer les documents. 
Dans ce cas, tout se passe bien car Arnold a le temps de faire son 
travail. 
Mais lorsqu'un classement est plus long, Arnold reçoit un nouvel 


ordre avant d’avoir pu terminer le précédent. Il est alors obligé de 
noter qu’il doit faire le second travail et continuer le premier. 
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Chef l 2 3 


ordre de ordre de ordre de 
classement 1 classement 2 classement 3 


— — —————…—…—_—_—….… — ——…— — —" —————____—_—…—…— — — 


AREA classement 1 


classement 2 classement 2 


en attente { classement 3 


temps 


Arnold est débordé.… 


Sur le troisième ordre de classement, Arnold n’a pas encore terminé 
son premier classement. Il est clair qu’Arnold est vite débordé 
comme l’est l’ Amstrad si les sous-programmes d’interruption sont 
plus longs que le temps entre deux interruptions. 


Il est préférable que le temps d’exécution d’un sous-programme 
d’interruption soit plus court que le temps entre deux interruptions, 
surtout si ces interruptions sont périodiques. Cela évitera les deux 
écueils suivants : 


— risque de ne plus avoir de place pour enregistrer les appels, 
— impossibilité de travailler en temps réel, comme le montre 
l’exemple suivant. 


Exemple 


10 CLS : WINDOW #1,1,16,1,1 

20: 7 

3O EVERY 50 GOSURB 100 ” toutes les secondes 
? 


40 

50 GOTO 50 * ou tout autre programme 

60 * 

100 * * sSous-programme : affiche l'heure 
110 FOR i=z1 TO 10000 : NEXT ” retard 

120 ” 

130 s = s + 1 £ une seconde supplementaire 


140 sec=s MOD 60: mn=(s\60) MOD 60 s:heure=z(s\3600) MOD 274 


160 FRINT #1.USING "###h#":heure; mn; sec 
170 RETURN 
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La boucle de la ligne 199 retarde l’exécution du sous-programme. 
Les interruptions arrivent cependant toutes les secondes mais n’acti- 
vent pas immédiatement le sous-programme. L’heure affichée est 
fausse. 


Vous trouverez dans le programme MACAO des exemples d’utilisa- 
tion des interruptions, ainsi que dans le programme suivant. 


Solitaire 


S 
Le 
L 
I 
T 
ñ 
I 
R 
E 





Un damier. Trente-sept pièces à éliminer les unes après les autres. Le 
joueur enlève d’abord une pièce grâce aux quatre flèches et en 
appuyant sur la touche [cir]. Il dirige ensuite son curseur sur une 
pièce qu’il désire bouger. Le choix fait, il valide la pièce en appuyant 
sur la touche [copy]. Quelques flèches pour arriver sur une case vide 
et la pièce validée fait un saut jusqu’à cette case, grâce à la touche 
[del]. Une prise se fait selon les mêmes règles que celles du jeu de 
dames. La pièce qui se déplace doit atterrir sur une place vide après 
avoir mangé une pièce et une seule. 
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Amusez-vous bien et ne craignez plus d’égarer des pions. L’ Amstrad 
sait où ils sont. 


: KAMXLRSRXXAXKXX 

ni: X SOLITAIRE *# 

S KAXALNALKAXAXX 

10 GOSUR 1000  initialisation 

20 

30 GOSURH 1500 * dessin initial 

40 ” 

90 ON RREAK GOSUR 5000 * sortie elegante 

rs |" ni 

680 1=2: j=2 * coord. de depart 

79 EVERY 30 GOSUH 2000 * clignot.point courant 

80” 

90 10=-1 : j0=-1 * point a deplacer inexistant 
100 EVERY 50,1 GOSUR 2200° clignot.point a deplacer 

110 

120 GOSUKR 500 * attente caractere ( a ) 

130 * 

140 WHILE Jamais = © *” boucle sans fin 

145 LL Cm 1 + Hi = 5 * pas de modif.avant verif. 
150 IF a=240 THEN jj =: — 1 : GOTO 300 * haut 
160 IF a=241 THEN jj = j + 1 : GOTO 500 ” bas 
170 IF a=242 THEN ii = i — 1 : GOTO O0 * gauche 
180 IF a=243 THEN ii = i + 1 : GOTO 300 ” droite 
190 * 

200 IF a=224 THEN GOSUR 3000 : GOTO 400 ° copy 
210 

220 IF a=127 THEN GOSUKH 3500 : GOTO 400 * del 
250. 7 

240 IF a= 16 THEN GOSUR 4000 : GOTO 400 * clear 
299 ” 

210 

300 DI 

310 IF (ii+jj<2)0R(ii+j3>10)0R(jj-1i)<—-4 DOR(Jj-11) >4 GOTO 400 
3520 i=MAX(O,MIN(6,.ii)) : j]=MAX(O,MIN(6,:j)) * point valable 
30: ? 

400 EI : GOSUEB 500 * attente caractere ( à ) 

410 ° 

450 ” 

440 WENI) 

450 ” 

RD PRE SES RSS SR ner GR En Et PNR Er qe 
491 " inkey$ " —-5> a$,a 

RTE NÉ rm 

500 WHILE INFEYS$<5>"" : WEND * vide le buffer 

520 as="" 

530 WHILE a$="" : a$=INKEYS : WEND 

9950 azASC(a$) 

SO °? 

570 RETURN 

580 ” 

990) 

SOD R S 
990 * initialisation 

BR, ee 

1000 MODE 1 

1010 INK OQ,0O =:INF 1.6 * Osnoir i:rouar 

10720 INK 2,9 =: INK 5,15 * 2:vert S:orarge 


1030 
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1040 WINDOW #1,7,31,1,25 jeu 


1050 WINDOW #2,:2,40,8,3 * resultats 
1060 WINDOW #3,32.40,.5.5 * chiffres 
1070 WINDOW #4,1,6,1.25 * mode d'emploi 
1075 WINDOL #5,35.35,7,25 ” solitaire 


1080 RORDER O 

100 FAFER #1,2: PAPER 82,0 

1100 PAPER #3.0: PAPER #4,0:PAPER #5,0 

1110 CLS:CLS#1:CLS#2:CLS#I: CLS#A 

1120 ” 

1130 PEN #1,1 :PEN #2,1 

1140 PEN #2,2 : PEN #4,3 : PEN #5,3 

11301” 

1160 DIM m{6,6) *’ damier 

1170 inc = 4 * increment 
1180 ” 

1190 reste=37 : enleve =0 

1200 GOSUB 1400 ” resultats 
1210 ” 

1220 GOSUR 1450 ” mode d’emploi 
1230 ” 

1300 RETURN 

1399 ” ---resultats 

1400 PRINT #2," + _" 

1410 PRINT #3,restes;senleve 

1420 RETURN 

1430 ” 

1450 PRINT #4,,CHR$ (240),,CHRS(241),,CHRS$(242),,CHRS$ (243), 
1460 PRINT #4,,"copy",,"del",,"cir".,'"esc" 
1470 PRINT #5." SOLITAIRE" 

1480 RETURN 

1490 *--—-———— 0 — 
1491 * dessin initial 

2492 ————-------—- 

1500 ” 

1510 FOR j = O TO & 

1520 FOR i = OC TO 6 


1530 m(i,j) = 1 

1540 IF i+j < 2 THEN mi,j) = -1 

1550 IF 1+j >10 THEN mûi,j) = -1 

1560 IF j-i <—-4 THEN m(i,j) = -1 

1570 IF j-i > 4 THEN m{i,j) = -1 ” 

1580 

1590 LOCATE #1,1+incti,i+incéh) 

1600 IF mi,j) <> —-1 THEN PRINT #1,CHR$(23O+m(i,3)) 
1610 * 

1620 NEXT :i 

1630 NEXT j 

1640 

1680 RETURN .. 

1990 7 00 Qu 
1991 ” IT clignotement point ordinaire 

LAIT — RNS me ene 


2000 DI :1F m{i,3) < © GOTODO 2070 

2002 FOR temps = OQ TO 2 

2005 LOCATE #1,i+incti,i+incé) 

2010 PEN #1,3 : PRINT #1,CHRS (230+m{1i,3)) 
2015 NEXT 

2020 LOCATE #1,1+inct#i,i+incs)j 

2030 PEN #1,1 : PRINT #1,CHRS$S(230+m{i,3j)) 
2070 RETURN 

2190 
Ci IT cliqgnotement point a deplacer 
2192... jme nm 
2200 DI :1IF iO < O©O OK j0 < O GOTO 2270 
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2202 FOR temps = O©O TO 2 

2205 LOCATE #1,1+inctki0,1+inchxj0 

2210 PEN #1,2 s PRINT #1,CHRS$(230+m{(10,j0)) 

2215 NEXT 

2220 LOCATE #1,1+incti0,i+inctjo 

2230 PEN #1,1 : PRINT #1,CHR$&(230+m(10,j0)) 

2270 RETURN 

2990 ‘=--mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmms mm memes 

2991 ? copy ( piece a deplacer ) 

2992  —-------œ—_——-m_—— 

3000 ? 

3010 10 = :i 

3020 j0 = ) 

30%0 RETURN 

490 = mmmm mm mmmmmmmmme mm mm mme mn mn en eee cn en 

3491 ” del ( coup a jouer ) 

8492 

3500 DI 

3510 difi = ABS(1-10) :difj = AHS(j-j0) : difij=difi+dif) 

3520 IF (difi=0 OK difi=2)AND(difj=0 OR difj=2) AND difij<>o 
THEN ok=i ELSE ok=0 


3330. ° 
3540 im=(i+i0)/2 : jm=(j+j0)/2 * point milieu 
3550 IF ok=O OR m(i,j)<>0 OR miim,jm)«<>1 
OR m(10,j0)<>1 GOTDO 3700 * non vide ou hors ecran 
3560 
3570 ii=i jji=)j 


3580 izim 
3585 i=i0 


j=jm :m(i,j)=0: GOSUB 4010 * efface point milieu 
i=)0 s:mi,j)=0:GOSUB 4010 * efface origine 


3590 i=ii j=jj :m{i,j)=#1:GOSUKH 4010 ° allume destination 

3600 reste = reste - 1 

3605 10 = 1 : JO = )j * point origine 

3610 enleve = enleve + 1 

3620 GOSUR 1400 *” resultats 

3640 ”? 

3700 EI 3: RETURN 

8990 == mm — 
3991 ? clear ( enlever une piece de force) 

3992 ——— 4010 : positionne une piece--- 


4000 DI :1IF mii,j)<>0 THEN reste=reste-1 :enleve=enleve+i 
4002 m{i,3) = © 

4005 GOSUKH 1400 ” resultats 

4010 LOCATE #1,1+inchki,i+incx*)j 

4020 PEN #1,1 : PRINT #1,CHRS$ (230+m{i,3)) 

4070 EI :RETURN 

4990 = 
4991 * break 

4992  ————- 

9000 CLS #4 : INPUT #4,'"voulez-vous arreter ce jJeu“:x% 
93010 IF LOWERS(x$#)<2:"o" THEN CLS #4:GOSUB 1450: RETURN 
5020 INPUT #4,'"voulez-vous un nouveau jeu":x%$ 

5030 IF LOWERS(»:#)<>"o" THEN CLEAR : CLS ::END 

9040 CLEAR : GOTO 10 


EO0SO 
5060 fin 
Commentaires 


Le damier est représenté par une matrice 7 X 7 (ligne 1169). Le point 
courant a pour coordonnées i et j, le point à déplacer 19 et j9. L’élé- 
ment m (i,j) vaut 1 si une pièce est sur la position (i,j), Ÿ si il n’y a pas 
de pièce et — 1 si cette position est interdite. 
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Les lignes 79 et 199 font clignoter les pièces toutes les 4 dixièmes de 
secondes. Les sous-programmes d’interruption sont masqués (lignes 
2909 et 2290) pour éviter que les variables i, j, i9, et j9 soient mani- 
pulées ‘‘en même temps’” par plusieurs niveaux d’interruption. Le 
démasquage est contenu implicitement dans les commandes 
RETURN (lignes 2979 et 2279). 


Variations 


Les maniaques de la simulation pourront créer un bruit de choc pour 
le déplacement des pièces. Les amateurs de jeu d’action pourront 
imposer un temps limite avec pénalisation et alarme en cas d’essais 
interdits (ligne 3559). Ils pourront limiter aussi l’utilisation de la tou- 
che [clr] qui enlève une pièce lorsque la situation est coincée. 


La réalisation d’un jeu de dames à partir du solitaire ne pose pas de 
problème particulier car la prise des pièces est identique dans les 
deux jeux. 
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Chapitre IV 
Le clavier 


L’Amstrad propose une gestion du clavier extrêmement souple, 
d’autant plus remarquable que celle-ci est accessible grâce à des ins- 
tructions BASIC. A côté de la possibilité, désormais classique, de 
programmer des touches de fonction (KEY), on trouve des instruc- 
tions permettant de modifier la vitesse de répétition des touches 
(SPEED KEY), et surtout de redéfinir entièrement le clavier (KEY 
DEF). Cette dernière possibilité, alliée à la redéfinition graphique 
des caractères (vue au chapitre I), permet à l’utilisateur d’adopter 
n’importe quel alphabet. Enfin, on trouve une instruction peu cou- 
rante mais extrêmement intéressante, INKEY (et JOY), qui avec 
instruction INKEY$ permet au programmeur de connaître l’état du 
clavier à tout instant. 
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La redéfinition du clavier 


Numérotation des caractères 


La plupart des micro-ordinateurs adoptent le jeu de caractères 
ASCII. Chaque lettre, majuscule ou minuscule, chaque chiffre, ainsi 
que divers signes (+, —, $, &, .,; etc.), sont associés à un numéro 
‘“standard’””, la valeur ASCII du caractère. Le tableau des valeurs 
ASCII est donné dans le manuel utilisateur de l’ Amstrad. On y 
retrouve les caractères Ÿ à 9 numérotés en ASCII de 48 à 57, les 
majuscules de l’alphabet numérotées de 65 à 99, les minuscules de 97 
à 122, etc. 


Ce tableau est complété dans l’ Amstrad jusqu’à 256 caractères, les 
caractères suivants étant soit des caractères d’extension (voir plus 
loin), soit des caractères à vocation graphique (dessin d’une note, 
d’une fusée, d’une figurine, etc.). 


Le tableau des caractères se présente ainsi : 


32 caractères 
de contrôle 


standard ASCII 
96 caractères 
de l’alphabet 


32 caractères 
d’extension 


complément 


9,6 caractères Amstrad 


‘“graphiques”’’ 
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Numérotation des touches 


Vous trouverez dans le manuel utilisateur le tableau des numéros de 
touche. Ces numéros permettent de repérer la position d’une touche 
sur le clavier. Par exemple la touche ÿ est la touche qui se trouve le 
plus en haut à droite du clavier ; elle est marquée |. La touche 47 est 
la grande touche située en bas du clavier, etc. 


De la touche au caractère 


Sur une machine à écrire mécanique, l’appui d’une touche provoque 
la frappe sur le papier d’une tige métallique au bout de laquelle est 
gravée la forme d’un caractère. Si l’on appuie en même temps sur 
cette touche et sur la touche SHIFT, on déclenche la frappe d’une 
autre tige métallique. Les caractères gravés sur ces deux tiges sont 
par exemple une lettre en majuscule et en minuscule. À une touche 
est reliée une ou deux tiges métalliques ; et pour éviter toute confu- 
sion, la touche est elle-même marquée du (ou des caractères) gravé(s) 
sur les tiges qui lui sont associées. 


L’Amstrad propose un système identique (à l’électronique près!) 
dans son principe ; mais à la différence de la machine à écrire, il est 
possible d’adopter pour chaque touche la ou les tiges de son choix. 
Pour cela, il n’est plus possible de repérer un couple ‘‘touche-tige”” 
par un caractère. C’est là que les numéros de touche et de caractère 
(tige) interviennent. Il ne faut plus dire : ‘‘L’appui de la touche mar- 
quée À déclenche la frappe de la tige supportant le caractère A??, 
mais : ‘‘L’appui de la touche numérotée 69 déclenche la frappe de la 
tige numérotée 97”’. 


L’instruction KEY DEF permet de modifier à loisir cette proposi- 
tion. Faites par exemple KEY DEF 69,1,98 qui ordonne maintenant 
que l’appui de la touche 69 déclenche la frappe de la tige 98 (le 1 
signifie que la touche peut être répétée), puis frappez la touche 69 
(elle est marquée A). Le caractère b est affiché. C’est le caractère 
dont la valeur ASCII est 98. 


Remarque 


L’Amstrad permet à l’utilisateur de redessiner sur chaque tige la 
forme du caractère. Mais n’utilisez pas cette possibilité pour redéfi- 
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nir votre clavier. En effet, le BASIC en particulier et les ordinateurs 
en général ne connaissent ni a, ni b, ni &, ni +. Ils ne connaissent que 
des numéros. Pour le BASIC, a est le caractère 97, b le caractère 98, 
etc. Si, au lieu d’utiliser KEY DEF, vous utilisiez la redéfinition gra- 
phique des caractères pour donner au caractère inscrit sur la tige 97 la 
forme d’un b , vous afficheriez bien un b en appuyant sur la touche 
marquée À, mais le BASIC comprendrait que vous avez utilisé le 
caractère 97, c’est-à-dire pour lui un ‘‘a””. Très pratique pour piéger 
son meilleur ami ; très peu pour écrire un programme ! 


Nous vous conseillons de respecter le partage des rôles suivant. La 
redéfinition des touches permet de réorganiser le clavier ; on peut 
ainsi composer un clavier AZERTY, ou alphabétique; améliorer 
l'ergonomie de certains groupes de touches. La redéfinition graphi- 
que des caractères permet, en respectant le standard ASCII (par 
exemple dans une application de traitement de texte avec une impri- 
mante spécialisée), de créer des caractères nouveaux tels que à, ê, è, 
ç, etc., ou bien de redessiner, en particulier pour des jeux, les carac- 
tères de n° 169 à 255. 


KEF DEF 


Cette instruction permet de modifier les caractères associés à une 
touche dans les trois cas suivants : 


- la touche est appuyée seule, 
- la touche est appuyée en même temps que SHIFT, 
- la touche est appuyée en même temps que CTRL. 


On indique derrière l’instruction le numéro de la touche, puis 1 ou ÿ, 
s’il l’on veut que la touche soit répétée en cas d’appui prolongé de 
celle-ci, puis les numéros des trois caractères qu’on associe à cette 
touche. 


Dans le programme suivant, on redessine tout d’abord le caractère 
169 pour obtenir un ç. Puis on associe à la touche marquée C 
(numéro 62) les caractères 99 (c), 67 (C) et 169 c’est-à-dire ç. (Les 
deux premiers caractères sont déjà associés à cette touche à la mise 
sous tension de l’ Amstrad.) 
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Après l’exécution du programme, vérifiez que la touche C est tou- 
jours ‘‘répétitive’”’ et que l’appui de cette touche avec la touche 
CTRL affiche bien un ç. Vous pouvez enfin écrire ‘‘français”” 
correctement ! 


lo SYMHOL hFIERK :: 


20)  SYMBUL 180,0U,0, eu, 102,96. 102.60,.112 ‘dessin du Car actere jet 
Tu KEY DEF 62.1,99.67,160 “ctrittouche L donne € cediiie 


Il existe 32 caractères d’extension numérotés de 128 à 159. Lorsque 
l’on affiche ce caractère par un PRINT CHRS$( ) la forme graphique 
qui lui est associée est affichée. En revanche, si l’on frappe une tou- 
che associée à ce caractère, une chaîne de caractères en extension est 
générée et affichée. L’instruction KEY permet de définir le contenu 
de cette chaîne. Elle est suivie du numéro de caractère (entre 128 et 
159), puis de la chaîne de caractères. 


A la mise sous tension de l’ Amstrad, les touches du ‘‘pavé numéri- 
que”” (à droite du clavier principal) sont affectées à des caractères 
d’extension. 


Le programme suivant affecte aux touches 64 et 65 (marquées 1 et 2 
en haut du clavier) les caractères d’extension 141 et 142 lorsqu’elles 
sont appuyées avec la touche CTRL (les autres affectations de ces 
touches ne sont pas modifiées). Puis il associe aux caractères 
d’extension 141 et 142 les chaînes de caractères. Vérifiez après avoir 
exécuté ce programme que la frappe des touches CTRL et 1 provo- 
que le lancement du programme, que celle de CTRL et 2 provoque 
l'instruction LIST. 


160 KEY DEF 64,0,49,33,141 
20 KEY DEF 65,0,50,:4,142 
30 KEY 141,"run"+CHRS$ (13) 
40 KEY 142,"list"+CHRS (13) 
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La mémoire du clavier 


Lorsque le BASIC exécute un programme, par exemple l’affichage 
de caractères à l’écran ou sur une imprimante, il ne s’occupe pas de 
ce que l'utilisateur peut éventuellement frapper au clavier. Ce n’est 
qu'une fois qu’il a exécuté son programme qu’il vient lire le clavier 
pour connaître les ordres qui lui seront communiqués. Et pourtant, 
durant le temps d’exécution d’un programme, les éventuelles frappes 
de touches sont mémorisées par l’ Amstrad. 


C’est la faculté des systèmes en temps réel de ‘‘faire plusieurs choses 
à la fois’. L’Amstrad ne se contente jamais de faire ‘‘tourner’’ un 
programme. Grâce à un système d’interruptions, il partage son 
temps en fractions très courtes, à gérer l’écran, le générateur de sons, 
l'horloge interne, le clavier, et à exécuter éventuellement un pro- 
gramme BASIC. 


Ainsi, quoiqu'il ait à faire par ailleurs, le système consacre une cer- 
taine partie de son temps, tous les 1/59° de seconde, à examiner 
l’état du clavier. Il note les touches pressées et les mémorise dans un 
buffer. Celui-ci est vidé au fur et à mesure que le programme princi- 
pal (le BASIC) vient lui-même lire ce buffer pour savoir si des tou- 
ches ont été frappées. 


La petite ‘‘expérience’’ suivante vous donnera une idée plus claire de 
la mémoire du clavier. Faites exécuter à l’ Amstrad l’instruction 
FOR I = 9 TO 29999 : NEXT et durant l’exécution, écrivez au cla- 
vier par exemple la liste des lettres dans l’ordre alphabétique. 


Vous devriez avoir terminé avant que l’ Amstrad n’ait eu le temps 
d’exécuter l’instruction. Lorsqu'il en aura fini avec cette boucle, les 
premières lettres de l’alphabet de A jusqu’à T s’afficheront. Vos 
vingt premières frappes au clavier ont été mémorisées, les suivantes 
sont perdues. 


Les vingt premières frappes se sont ‘‘entassées’” dans le buffer des 
touches, et comme le programme BASIC ne venait pas les lire, il y a 
eu saturation du buffer. La mémoire du clavier ne dépasse pas en 
effet vingt frappes. Si vous frappez maintenant d’autres touches, 
celles-ci sont immédiatement affichées à l’écran. Le BASIC ne fait 
rien d’autre qu’attendre vos ordres et vide constamment le buffer 
dès que celui-ci se remplit, dès que vous frappez une touche. 


INKEY$ et INKEY 


L’instruction a$ = INKEY$ place dans la variable a$ soit le carac- 
tère vide ‘‘ ””, si le buffer des touches est à ce moment vide, soit le 
premier caractère placé dans le buffer. Ce premier caractère est asso- 
cié à la touche la plus anciennement frappée au clavier, que le 
BASIC n’a pas pris en compte. INKEY$ permet ainsi de perdre le 
moins de frappes possible. 


Cela peut avoir des inconvénients, par exemple dans un programme 
de ce type : 


iouu FRINT ‘voulez-vous continuer" 
1010) a$="": WHILE a$='"": a$=INrEYS: WENWND 
1 IF a$::'"'o" THEN END 


L’instruction en 1919 initialise a$, puis boucle tant que a$ est égal au 
caractère vide, donc tant que le buffer est vide. Dès que l’utilisateur 
répond, on sort de la boucle et on analyse sa réponse en 1929. En 
revanche, si au moment de l’exécution de INKEY$, le buffer des 
touches n’est pas vide, on sort immédiatement de la boucle avec un 
caractère placé dans aÿ, associé à une touche anciennement frappée, 
qui ne répond pas à la question posée. 


Une première solution pour éviter ce problème consiste, avant de 
poser la question, à vider le buffer des touches, en rajoutant par 
exemple : 


990 WHILE INKEY$<>"": WEND 


L’instruction INKEY peut elle aussi permettre de résoudre ce pro- 
blème. Cette instruction donne en effet l’état au moment de l’ins- 
truction de la touche testée. Elle est suivie du numéro de touche. Par 
exemple a = INKEY (n° touche) place dans a l’état de la touche au 
moment de l’instruction : 


— ] si la touche n’est pas pressée, 
+@ si elle est pressée seule, 
32 si elle est pressée en même temps que SHIFT, 
128 si elle est pressée en même temps que CTRL, 
169 si elle est pressée en même temps que SHIFT et CTRL. 


Le programme suivant offre une seconde solution à notre petit pro- 
blème. On est sûr que la touche marquée O (numéro 34) ou que 
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la touche marquée N (numéro 46) a été frappée après l’affichage de 
la question. Cependant elle oblige l’utilisateur à frapper soit la 
lettre O, soit la lettre N et aucune autre, pour sortir de la boucle. 


1000 PRINT "voulez-vous continuer 2?" 
1010 a=-1: b=-1 

1020 WHILE a=-1 AND b=-1 

1030 a=INKEY (34)5: D=INKEY (46) 
1040 WEND 

1050 IF b<>-1 THEN END 
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Chapitre V 





La machine 


Le microprocesseur Z89 





La description que nous faisons du Z89 ne prétend pas être 
complète. Les lecteurs désireux d’aller plus loin dans la connaissance 
de ce microprocesseur pourront se reporter à la documentation du 
constructeur ZILOG, ou aux nombreux livres consacrés au Z89. 


bus 
de contrôle 





_horloge 
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Schéma du brochage du Z88. 
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Signal d’horloge 


L’Amstrad utilise le microprocesseur Z8Ÿ À, identique au Z89 mais 
pouvant fonctionner plus rapidement. La fréquence du signal d’hor- 
loge, qui lui permet de ‘‘rythmer”’”’ ses opérations, est de 4 MHz. Ceci 
assure un temps moyen d’instruction d’une microseconde (un millio- 
nième de seconde). 


Le bus de contrôle 


Il comporte l’ensemble des signaux nécessaires au fonctionnement 
du Z8ÿ avec ses voisins. Les fils MREQ et IORQ permettent au Z8ÿ 
de sélectionner pour une lecture (par RD read) ou pour une écriture 
(par WR write) soit la mémoire, soit les circuits d’entrée/sortie. Par 
l’intermédiaire de ceux-ci, le microprocesseur peut contrôler les dif- 
férents périphériques : clavier, écran, générateur de sons, lecteur de 
cassettes, imprimante, éventuellement lecteur de disquettes. 


Notons aussi l’entrée INT (interruption). Cette entrée permet à un 
circuit externe d’obliger le Z8Ÿ à interrompre le traitement en cours 
et à effectuer un traitement ‘‘d’interruption’””. Dans l’ Amstrad une 
horloge externe interrompt le Z89 tous les 1/399° de seconde. Cette 
interruption permet au Z89 de synchroniser ses traitements (gestion 
de l’écran, du générateur de sons...). 


Le bus de données 


Sur les huit fils de ce bus circulent les informations échangées entre 
le Z89 et la mémoire ou les circuits d’entrée/sortie. La dimension du 
bus de données du Z89 le fait ranger dans la catégorie des micropro- 
cesseurs ‘‘8 bits’”’. L'information est organisée en octets, ensembles 
de huit bits. 


Le bus d’adresses 


Il comporte seize fils. Le Z89 peut donc adresser directement 
2'° cases mémoire (soit 64 k-octets) et 2!6 circuits d’entrée/sortie. 
Nous voyons maintenant comment le Z89 de l’ Amstrad travaille 
avec 96 k-octets de mémoire, et comment on peut y ajouter de nom- 
breux k-octets de ROM. 
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L'organisation de la mémoire de l’ Amstrad 





version de base 


re 


&FFFF 
&CY99 
&BFFF 
&19000 
octets 
soit 
64 k-octets 
&4909 
&3FFF 
RAM basse ROM basse 
&0099 





extensions mémoire 


nes 


&FFFF = 
première ROM | dernière ROM 
en extension , en extension 
jusqu’à 
&CP00 


252 ROM 


En version de base, l’ Amstrad comprend : 


- 64 k-octets de RAM, placés entre &9099 et &FFFF. 
- 32 k-octets de ROM, placés pour la partie basse entre &9999 et 
&3FFF, pour la partie haute entre &CY9Y et &FFFF. 


En extension, il est possible de rajouter dans la partie haute de la 
mémoire jusqu’à 252 boîtiers de 16 k-octets de ROM. 


Toute opération d’écriture se fait bien évidemment dans la RAM, 
puisqu'il est impossible d’écrire dans une mémoire ROM. Les choses 
sont plus compliquées lorsqu'il s’agit de lire une mémoire (sauf lors- 
que celle-ci se situe entre &4999 et &BFFF, où se trouve uniquement 
de la RAM). Plusieurs boîtiers mémoire pourraient en effet répondre 
au Z89, lorsque celui-ci effectue une lecture dans la partie basse ou 
haute de la mémoire. Un système de sélection des boîtiers mémoire 
(commandé par un circuit d’entrée/sortie) permet au Z8ÿ de choisir 
le boîtier mémoire qu’il désire lire ; dans la partie basse soit la RAM 
basse, soit la ROM basse ; dans la partie haute soit la RAM haute, 
soit l’une des ROM hautes, repérée par un numéro de Ÿ à 251. 
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Contenu de la mémoire 
en version de base 












&FFFF 
ROM 
Mémoire écran 
BASIC 
&C999 Ni 
Données système 
. 
Données pour ROM haute 
&ABCY 
&ABFF 
MÉMOIRE 
UTILISATEUR 
ROM 
&9179 
Données pour ROM haute SYSTÈME 
&9949 - 
25050 


La ROM SYSTÈME et ses zones RAM 


La ROM SYSTÈME contient l’ensemble des programmes du 
système d’exploitation. Elle se compose d’une série de ‘‘routines’”, 
de programmes, qui organisent le bon fonctionnement de la 
machine. Les 64 premiers octets (&49) de la ROM SYSTÈME sont 
recopiés dans la ZONE SYSTÈME de la RAM. Ils sont fondamen- 
taux pour la ‘navigation dans la mémoire”” que nous verrons plus 
loin. 


Les programmes système ont besoin de mémoire vive pour travailler. 
Une partie de la RAM leur est réservée, les DONNÉES SYSTÈME. 
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Un programme a aussi besoin d’une PILE pour fonctionner. Cette 
zone de la mémoire est utilisée pour sauvegarder temporairement des 
informations essentielles : l’adresse de retour d’un appel à un sous- 
programme, l’adresse de l’instruction n’ayant pu être exécutée à 
cause d’une interruption, etc. Cette zone est placée en dessous de 
l'adresse &C099. 

La zone BLOC DE SAUTS contient un ensemble d’instructions de 
saut à des routines de la ROM SYSTÈME. Nous vous donnerons 
plus loin une liste d’adresses dans le BLOC DE SAUTS qui vous per- 
mettront de faire exécuter très rapidement des actions importantes, 
telles que lecture d’un caractère au clavier, envoi d’un caractère sur 
l’écran, etc. 


La ROM BASIC et ses zones RAM 


La ROM BASIC contient l’interpréteur BASIC. Ce programme est 
le ‘‘chef d’orchestre”” de l’ensemble. Il utilise abondamment les pro- 
grammes de la ROM SYSTÈME pour ses ‘‘menus travaux”. Les 
deux zones DONNÉES POUR ROM HAUTE sont réservées pour 
ses besoins en mémoire vive. 


La mémoire écran 

Placée entre les adresses &CY99 et &FFFF, elle occupe bien les 
16 k-octets prévus. 

La mémoire utilisateur 


Faites le compte, il vous reste 43 664 octets de RAM. Il vous faudra 
un programme BASIC très important, beaucoup de programmes 
‘‘machine’”” et beaucoup de données pour les occuper tous! 


Les extensions de ROM 





I est possible de rajouter jusqu’à 252 boîtiers de 16 k-octets de 
ROM. Ces extensions de mémoire sont de deux types : 


Les ROM de premier plan (foreground ROM) 


Lorsqu'une ROM de ce type est placée dans la mémoire de l’Ams- 
trad, elle remplace dans le rôle de chef d’orchestre la ROM BASIC. 
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Il est ainsi possible d’implanter le langage FORTH ou le système 
CP/M. Des applications telles que traitement de texte, assembleur, 
debugger, etc., sont (ou seront) disponibles en ROM foreground sur 
l’Amstrad. 


La taille de ces programmes ne sera pas un obstacle à leur intégration 
sur l’ Amstrad. Le système permet en effet à un programme fore- 
ground d’occuper quatre ROM foreground (64 k-octets !). 


Les ROM de second plen (background ROM) 
Ces ROM contiennent des programmes qui sont des extensions : 


— du système d’exploitation ; par exemple pour gérer un périphéri- 
que supplémentaire (le floppy disk..….), 

— des programmes foreground ; par exemple une extension des pos- 
sibilités du BASIC (nouvelles fonctions graphiques...). 


L’Amstrad ne peut supporter que sept ROM background au maxi- 
mum. Cette limite ne doit pas vous effrayer ; il est bien certain que 
les concepteurs de l’ Amstrad ont prévu ‘‘très large’”’, que ce soit 
pour les ROM background, ou pour les ROM foreground. Vous 
n’utiliserez probablement jamais les 252 ROM possibles ! 


Il faut noter que l’implantation de ROM en extension peut avoir 
pour effet de diminuer la mémoire utilisateur. A la mise sous tension 
de l’ Amstrad, chaque programme en ROM ‘‘se réserve’ une zone de 
données en RAM. La taille des DONNÉES POUR ROM HAUTE 
peut ainsi augmenter légèrement, au détriment de la mémoire utilisa- 
teur. 


Retour à la mémoire utilisateur. 
Les instructions HIMEM et MEMORY 


Nous l’avons vu, sans ROM en extension, la zone de &ÿ179 à 
&ABFF est réservée à l’utilisateur. Cette zone pourrait être par 
exemple de &ÿ299 à &Aÿ9Ÿ avec des ROM en extension. Disons que 
la zone utilisateur est comprise entre BAS et HAUT dont les valeurs 
dans nos exemples seront BAS = &ÿ179 et HAUT = &ABFF. 
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L’instruction HIMEM 


L’instruction HIMEM permet de connaître l’adresse de l’octet le 
plus haut de la zone réservée aux programmes BASIC. Au-dessus de 
cette zone, jusqu’à HAUT, la mémoire utilisateur peut avoir trois 
utilisations. 


Zone pour redéfinition 
des caractères 
Zone pour programmes 
machine 


Tampon pour fichier 
cassette 


HAUT 






9 ou 4996 octets (9 ou 4 k-octets) 
HIMEM 









Zone pour 
programmes 
BASIC 






BAS (&9179) 

L’instruction SYMBOL AFTER (qui réserve une zone pour la redé- 
finition des caractères), les instructions du type OPEN et CLOSE 
(ouverture et fermeture de fichiers cassette) ont donc une influence 
sur la zone réservée au BASIC. Pour vous en convaincre, frappez ces 
instructions sur votre Amstrad. 


Après réinitialisation par CTRL + SHIFT + ESC, faites ?HEXS$ 
(HIMEM). Il s'affiche alors &AB7F (soit HAUT -— &8ÿ ou 
&ABFF — &89). A l’initialisation, le BASIC réserve une zone pour 
redéfinir les seize derniers caractères. Huit octets sont nécessaires 
pour définir un caractère. La zone réservée est bien de 8 x 16 = 128 
— &89 octets. 


Après SYMBOL AFTER 256, ?HEX$ (HIMEM) affiche &ABFF 
(= HAUT). Aucune zone ‘‘caractère’” n’est réservée. 


Après SYMBOL AFTER Ÿ, ?HEX$ (HIMEM) affiche &A3FF 
(= HAUT -— &899). Une zone de 256 X 8 octets (&899) est réservée 
pour redéfinir les 256 caractères. 
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Faites ensuite OPENIN ‘‘TOTO”’ puis ESC deux fois. Un fichier 
cassette est ouvert. ?HEX$ (HIMEM) affiche &93FF. 4 K ou 
&1999 octets supplémentaires ont été réservés par le BASIC pour le 


fichier cassette. 


Faites ensuite CLOSEIN ‘‘TOTO”’ puis ?HEX$ (HIMEM). Vous 
voyez &A3FF. La zone fichier est libérée. 


L’instruction MEMORY 


Cette instruction permet de limiter à une adresse précise la zone 
réservée aux programmes BASIC. Si vous avez suivi notre enchaîne- 
ment d’instructions jusqu’à maintenant, la zone utilisateur va ainsi 
évoluer après l’instruction MEMORY &9BFF. 


&899 octets 
pour caractères 
HAUT -— &800 
HIMEM — &1909 octets 
réservés puis 
libérés par 
OPENIN et 
CLOSEIN 
HAUT -— &899 
— &1009 Zone pour 
programmes 
BASIC 
HAUT Après MEMORY &9BFF 


&899 octets 
pour caractères 


Zone réservée 
par 


MEMORY &9BFF 


Zone de &1999 


octets qui sera 
utilisée pour les 
OPEN et 
CLOSE 
futurs 


Zone pour 
programmes 
BASIC 
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&ABFF 


&A3FF -— HIMEM 


&93FF 
&ABFF 
&ABFF 


&A3FF HIMEM 


&9BFF 


Cette zone est utilisée par les pro- 
grammes BASIC lorsqu'un fichier 
cassette n’est pas ouvert. Lorsqu'on 
ouvre un fichier, le BASIC opère un 
‘“garbage collecting’’ ou ‘‘mise à la 
poubelle’”” d’informations devenues 
inutiles, puis un tassement des infor- 
mations utiles sous HIMEM. 


L’instruction MEMORY &9BFF interdit au BASIC de placer ses 
programmes, ou son tampon pour fichier cassette, au-dessus de 
&9BFF. La zone de &9BFF à &A3FF est donc libre. Vous pourrez en 
faire ce que vous voudrez. Par exemple y placer vos programmes 
machine. 


Attention 


Le BASIC Amstrad fonctionnera mal si vous augmentez votre zone 
mémoire ‘‘caractère’” par SYMBOL AFTER après avoir réservé de 
la mémoire machine par MEMORY. De même si vous réservez de la 
mémoire par MEMORY alors qu’un fichier cassette est ouvert. Nous 
vous conseillons pour tous vos programmes : 


— de réserver tout d’abord, une fois pour toutes, votre zone pour 
redéfinir les caractères (utilisez une seule fois l’instruction SYMBOL 
AFTER), 

— puis de réserver une fois pour toutes votre zone pour program- 
mes machine (utilisez une seule fois l’instruction MEMORY). 


Vous n’aurez alors aucun problème pour ouvrir et fermer vos 
fichiers cassette, redéfinir vos caractères, rentrer et utiliser vos 
programmes machine. 
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Chapitre VI 


Le langage 
machine du Z8Q 


Introduction 


Intérêt du langage machine 


Pourquoi apprendre un langage complexe et difficile à mettre en 
œuvre, alors que l’on dispose d’un langage aussi ‘‘simple”” et puis- 
sant que le BASIC ? La réponse est connue. La simplicité (relative !) 
du BASIC se paie par des temps d’exécution parfois trop longs. 


Si l’on programme grâce à l’instruction EVERY un traitement 
devant s’effectuer toutes les secondes, on voit qu’il est nécessaire que 
ce traitement dure moins d’une seconde. Le langage machine pourra 
venir suppléer le BASIC, là où le temps d’exécution est crucial. 


Qu’est-ce que le langage machine ? 


L’idée géniale, qui est à l’origine des ordinateurs, a été d’associer à 
chaque opération (ou instruction) qu’on veut lui faire exécuter un 
nombre. On pourrait ainsi imaginer que pour un ordinateur : 


1 signifie additionner, 
92 soustraire, etc. 
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Connaître le langage machine d’un microprocesseur, c’est connaître 
l’ensemble des instructions qu’il est capable d’effectuer, et savoir 
pour chaque instruction quel est le nombre, le code opératoire, qui 
lui est associé. 


Le langage assembleur 


Il est plus agréable de représenter chaque instruction par un 
‘‘mnémonique”” : 


ADD pour additionner, 
SUB pour soustraire, etc. 


Cette représentation permet au programmeur de mieux lire son pro- 
gramme Jusqu'à ce qu’il le traduise en code machine et le place en 
mémoire. Nous l’utiliserons pour vous décrire les instructions du 
Z 89. 


Au moment où nous écrivons, Amstrad a annoncé la sortie pro- 
chaine d’un assembleur. Un assembleur permet d’écrire un pro- 
gramme en représentation mnémonique (langage assembleur) et se 
charge de la traduction en code machine. 


Les registres du Z84 





Les registres sont des zones de mémoire vive interne au microproces- 
seur. Nous vous citons, pour information, les deux registres 
‘16 bits”” les plus importants qui contrôlent le bon déroulement des 
programmes. 


— le registre PC (Program Counter ou pointeur d’instruction) qui 
maintient à tout instant l’adresse de l’instruction en cours d’exécu- 
tion, 

— le registre SP (Stack Pointer ou pointeur de pile) qui maintient à 
tout instant l’adresse du sommet de la pile. 


Ces registres sont gérés par le Z8® et vous pourrez ne pas vous en 
occuper. Voici un tableau des autres registres du Z89. 
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Le Z8ÿ possède deux jeux de huit registres de huit bits : le jeu prin- 
cipal (A, F, B, C, D, E, H, L) et le jeu secondaire (A’, F”, B’, C”, 
D’, E’, H”, L’). À un moment donné, seul un jeu est disponible. Des 
instructions d’échange permettent de sélectionner chaque jeu. Dans 
l’Amstrad, le jeu secondaire est réservé au système. Il est donc forte- 
ment conseillé de n’utiliser que le jeu principal. 


Le registre F est un registre spécial. Il contient six bits indicateurs (ou 
flags) positionnés automatiquement par le Z89 lors de certaines ins- 
tructions (deux bits sont inutilisés). Il n’existe pas d’instruction per- 
mettant de modifier directement son contenu. Le bit Ÿ de ce registre 
est l’indicateur de retenue (CARRY FLAG). Ce flag est très impor- 
tant dans le système de l’ Amstrad car toutes les routines système 
dont nous vous donnerons les adresses fournissent en sortie le Carry 
Flag à 1, si la routine s’est correctement exécutée, à Ÿ sinon. 


Tous les autres registres peuvent être considérés comme de la 
mémoire vive supplémentaire, dans la mesure où des instructions 
permettent de modifier leur contenu (écrire) ou de transférer ce 
contenu ‘‘ailleurs’” (lire). (Bien sûr, d’autres instructions les rendent 
‘‘supérieurs’” à la mémoire vive externe.) 


Le registre À est aussi appelé l’accumulateur. C’est sur ce registre 
que le plus grand nombre d’instructions est possible. 


Les registres B, C, D, E, H, L peuvent former trois paires de regis- 
tres, BC, DE et HL, utilisables comme registres 16 bits. 
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Signalons, en guise de prélude à la description des instructions, les 
‘‘spécialités’” importantes de certains registres 16 bits. 


HL, IX et IY sont très utiles pour accéder à la mémoire. 


BC est nécessaire pour accéder aux circuits d’entrée/sortie. 


Outils : l’instruction CALL 
et un programme... BASIC 





Avant d’aller plus loin dans l’étude du Z84, nous en savons mainte- 
nant suffisamment pour présenter l’instruction CALL. Nous vous 
proposerons ensuite un petit programme BASIC qui vous permettra 
de rentrer facilement en mémoire les programmes machine que nous 
vous donnerons en exemple. 


L’instruction BASIC CALE, 
ou comment faire exécuter un programme machine. 


Le BASIC Amstrad présente l’instruction CALL qui peut sembler, a 
priori, être l’équivalente de l’instruction EXEC que l’on retrouve 
dans d’autres BASIC. En réalité, cette instruction se révèle extrême- 
ment plus puissante. 


Nous citons pour information la possibilité de faire exécuter une 
‘‘commande externe’” en faisant, par exemple, 


CALL | CERCLE, paramètres. 


La barre verticale (|) signale que le programme CERCLE (appelé 
pour tracer un cercle dont l’origine et le rayon sont donnés par les 
paramètres) se trouve en ROM d’extension. L’organisation interne 
des ROM permet au système de retrouver l’adresse du programme 
CERCLE et de le faire exécuter. 


Nous nous attacherons uniquement à l’instruction CALL du type 
CALL &6900. 


Cette instruction permet d’appeler dans un programme BASIC un 
sous-programme écrit en langage machine (placé ici à l’adresse 


&6000). 
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Cette instruction peut, elle aussi, être accompagnée de paramètres. 


Exemple 
CALL &6000, &ÿ931, &3243 
Voici alors exactement ce qu’exécute l’instruction CALL : 


— elle place dans l’accumulateur A le nombre de paramètres conte- 
nus dans l'instruction. Ici il y en a 2, &ÿ031 et &3243. Le contenu de 
A est donc 2; 

— elle place ensuite les paramètres dans une zone de données ; 


début de 


la zone ——- Tout d’abord le dernier paramètre 


En fin de zone le premier paramètre 





Les paramètres, comme on le voit sur la figure ci-dessus, peuvent 
prendre les valeurs de &9999 à &FFFF. Les poids faibles sont placés 
avant les poids forts. (On a en mémoire 843 puis &32 pour représen- 
ter le nombre &3243.) 


— elle place dans le registre IX l’adresse du début de la zone. (Cette 
zone est placée dans les DONNÉES POUR ROM HAUTE.) : 
— elle appelle ensuite le programme, commençant ici à l’adresse 


&6000. 


Tout ceci peut sembler a priori bien complexe. Nous verrons plus 
loin des exemples très précis d’utilisation de l’instruction CALL avec 
‘‘passage de paramètres”’. 


Programme d’entrée de données machine 


Ce programme vous demande l’adresse du début de la zone mémoire 
où vous voulez écrire. Ensuite 1l affiche, adresse après adresse, la 
valeur de l’adresse et le contenu de la mémoire à cette adresse. Si 
vous voulez modifier ce contenu, vous indiquez la nouvelle valeur, 
sinon vous frappez RETURN. Si vous voulez sortir du programme, 
vous frappez X. Le programme vous propose alors une vérification, 
qui vous permet de relire (et de modifier à nouveau par le même 
principe) les valeurs que vous avez introduites. Les adresses et 
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valeurs doivent être données en hexadécimal. Il ne faut cependant 
pas indiquer le caractère ‘‘&’’. Le sous-programme placé en 329 
effectue la conversion nécessaire. 


10 ® entree des programmes 


20 © 


TO MEMORY £OSFFF ‘reservation memoire 
40 INPUT ‘“adresse":Aï adresse debut 

50 GOSUK 770: ADRESSE=A ‘’conversion en hexa 
7: 7 

8 ” 

90 ? boucle 

100 GOSUR 160 affiche adresse et ancien contenu 
110 GOSUR 220 "traitement demande 

120 ADRESSE=ADRESSE+1: GOTO 100 

140 ? 

TO 


160 ’affichage adresse et ancienne valeur 

170 A=PEEK (ADRESSE) 

180 FRINT HEX$(ADRESSE)", “3:31: FRINT HEX#(A)D" ‘": 
190 RETURN 

200 ? 

2107 

220 ‘traitement demande 

270 INPUT ‘“of":A$ 


240 IF A$f="" THEN RETURN ‘pas de modification 
250 IF Af=":" THEN GOTO :90 "fin sur X 

260 ‘on prend en compte la valeur fournie 

270 GOSUB 2I20: VALEUR=A ‘conversion 

280 ‘IF VALEUR®%FF THEN GOTO TTO ‘verification 


290 POFE ADRESSE,VALEUR: RÇFTURN ‘mise en memoire 
ZOO * 


LC BU 
Z20 ‘conversion chaine caracteres en valeur hexra 
TO ‘en entree af. en sortie à 


40 A=VAL("L"4+A#) 
750 IF A“O THEN A=A+7" 16 


35360 RETURN 

RS 

TB ? 

90 ‘fin. demande de verification 


400 INPUT ‘"verification":At 
410 IF Af="O" THEN GOTO 40: END 


Première routine système 


Dernier outil avant d’aller plus loin, voici une routine système que 
nous utiliserons pour visualiser sur l’écran les résultats de nos pro- 
grammes. Nous vous la présentons sous le format que nous avons 
adopté pour toutes les autres routines. 


Action : Écriture d’un caractère sur l’écran. 

Adresse : & BBSD. 

Entrée : L’accumulateur A contient le caractère à écrire. 
Sortie : Les registres du jeu principal sont modifiés. 


L'adresse est l’adresse de départ de la routine. (Elle se trouve bien 
dans la zone BLOC DE SAUTS.) 
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L’entrée donne les conditions qu’il faut remplir pour que l’action 
soit correctement exécutée. 


La sortie indique quels sont les registres modifiés. Faites bien atten- 
tion à ce renseignement ; Vous pourriez avoir des surprises désagréa- 
bles sinon ! (On voit ici, par exemple, qu'après l’exécution de l’affi- 
chage, l’accumulateur A ne contient plus le caractère.) 


L’instruction de chargement LOAD 


Définition 
L’instruction LOAD (mnémonique LD) permet de charger (de 
placer) une valeur dans un registre ou dans une case de la mémoire 


externe. Cette valeur peut être précisée dans l’instruction (valeur 
immédiate) ou être contenue dans un registre ou une case mémoire. 


Oublions un instant les chargements concernant la mémoire et 
prenons ces deux exemples : 


LD A, &ÿ7 place dans l’accumulateur A la valeur ‘‘immédiate” 
&Ÿ7. 

LD C, B place dans le registre C, le contenu du registre B. 
(Si B contient &15, alors C contient maintenant, lui 
aussi &15.) 


On remarque au passage que dans la représentation mnémonique des 
instructions, le destinataire se trouve à gauche de la virgule, la source 
à droite. 


Programme : Afficher le caractère @ sur l’écran 


Nous utilisons la routine d’affichage en &BBSD. Il faut donc placer 
dans l’accumulateur A la valeur ASCII du caractère Ÿ, qui est &39, 
puis sauter à l’adresse de la routine. 


(Les valeurs ASCII des caractères sont données dans l’appendice III 
du manuel utilisateur.) 
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Instruction Code 


LD A, &39 &3E 
&30 valeur 
JP &BBSD &C3 
&SD adresse 
&BB 


(Vous trouverez en annexe la liste complète des instructions du Z89 
avec leur code machine.) 


JP (Gump) est une instruction de saut (équivalente au GOTO du 
BASIC). 


Dans chaque code machine des instructions, nous avons écrit en 
caractères gras le code opératoire. A la suite, se trouvent les ‘‘opé- 
randes”” : la valeur à charger dans A, l’adresse où sauter. Vous 
remarquez que l’on place en mémoire tout d’abord &SD puis &BB, 
au lieu de &BB puis &SD. En mémoire, on place tout d’abord les 
poids faibles, puis les poids forts d’un opérande de deux octets. 


Rentrez, grâce à notre programme d’entrée de données, les valeurs 
&3E, &39, &C3, &5SD, &BB à partir de l’adresse &6909. N’indiquez 
pas le ‘‘&’”, la conversion est effectuée par le programme. N’hésitez 
pas à vérifier vos valeurs. 


Frappez ensuite CALL &6ÿ09 (indiquez ‘‘&’”’) pour faire exécuter ce 
programme. Le @ s’affiche. 


Adressage de la mémoire 
Nous revenons maintenant aux chargements concernant la mémoire. 


Pour indiquer l’adresse de la mémoire concernée, on dispose de deux 
possibilités : 
— indiquer ‘‘immédiatement”” cette adresse ; 


LD (&#179), D charge dans la mémoire d’adresse &#174, le 
contenu de D. 


— placer cette adresse dans l’un des trois registres HL, IX ou IY. 

LD B, (HL) charge dans B le contenu de la mémoire ‘‘pointée”’ 
par HL. Si HL contient la valeur &ÿ174, cette ins- 
truction placera dans B le contenu de la mémoire 
d’adresse &ÿ170. 
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Vous avez remarqué que l’expression (XX) signifie ‘‘contenu de la 
mémoire d’adresse X X”’. 


L'utilisation de IX et IY dans le second type d’adressage est légère- 
ment différente de celle de HL. Avec IX et IY, il est possible de 
rajouter un déplacement ‘‘immédiat’’ à l’adresse contenue dans le 
registre. Ce déplacement est fourni en complément à deux sur un 
octet. 


LD B, (IX + &ÿ3) place dans B le contenu de l’adresse donnée 
par la valeur de IX + &ÿ3. SiIX = &ÿ170,on 
place dans B le contenu de l’adresse &@173. 


LD (IY + &FD), E place le contenu de E dans la mémoire dont 
l’adresse est égale à la valeur de IY — &ÿ3 
(complément à deux de &FD). Si IY — 
&Ÿ179, on place E dans la mémoire d’adresse 
&Y16D. 


(Pour les lecteurs non familiarisés avec le complément à deux, nous 
donnons en annexe la méthode de calcul de ce complément.) 


Programme : afficher un caractère quelconque 
Utilisation de l’instruction CALL avec un paramètre. 


Nous allons écrire un programme machine à partir de l’adresse 
&6919. Ce programme affichera le caractère dont la valeur ASCII 
sera le paramètre de l’instruction CALL. 


CALL &6010, &30 affichera Ÿ à l’écran. 


Nous avons vu que l'instruction CALL place en mémoire pointée 
par le registre IX le ou les paramètres suivant CALL. Ici nous 
aurons. 


IX — premier et dernier paramètre de l’appel. 


Le programme doit lire ce paramètre et le placer dans l’accumulateur 
(condition d’entrée de la routine d’affichage). On utilise la deuxième 
possibilité d’adressage de la mémoire. 
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Instruction Code 


LD A, (IX + @) &DD 
&7E | 
&00 déplacement 


JP &BBSD &C3 
&SD adresse 
&BB 


(Vous remarquez que le code opératoire de LD A, (IX + Ü) utilise 
deux octets, ce qui est systématique lorsque le registre IX est utilisé.) 


Après avoir rentré ce programme en mémoire à partir de &6ÿ10, 
faites : 


CALL &6919, &39 puis 
CALL &6ÿ19, &31 puis 
CALL &6ÿ19, &41. 


A l’écran s’affichent Ÿ, 1 puis A (dont les valeurs ASCII sont &30, 
&31, &41). Profitez-en pour afficher les caractères ‘‘invisibles’” de 
&09 à &IF. 


Les règles d’adressage pour l’instruction LD 


— Tous les chargements entre registres 8 ou 16 bits sont possibles. 
LD A, E 
LD BC, HL etc. 


— Les chargements de mémoire à mémoire sont impossibles. 
LD (&#174), (HL) est interdit. Il faut faire, par exemple, 
LD A, (HL) puis LD (&ÿ179), A. 


— Les chargements immédiats sont possibles, sauf lorsque deux 
valeurs immédiates sont présentes dans l’instruction (mais voir aussi 
la règle suivante). 


LD A, &22 

LD BC, &2222 

LD (HL), &22 sont possibles 
LD (&9170), &2222 est impossible 


— Ilest possible d'adresser la mémoire en 16 bits lorsque l’adresse 
est indiquée immédiatement, pas lorsqu'elle est pointée par un 
registre. 
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LD (HL), &2222 
LD DE, (HL) sont impossibles 
LD (&2222), DE est possible 


Sauts, appels et retours 
Les instructions les plus importantes 


Sauts, appels et retours de sous-programme conditionnels 
Nous avons déjà rencontré le saut JP. 


JP ‘‘adresse’”” permet de sauter à l’‘‘adresse’”. C’est l’équivalent du 
GOTO en BASIC. 


CALL ‘‘adresse’’ permet d’appeler un sous-programme placé à 
partir de l’‘‘adresse”’. C’est l’équivalent du GOSUB en BASIC. 
(Ne confondez pas le CALL machine et le CALL BASIC !) 


Un sous-programme doit obligatoirement se terminer par une 
instruction de retour de sous-programme du type RET, qui est 
l'équivalent du RETURN en BASIC. 


Sauts, appels et retours conditionnels 


Comme leurs noms l’indiquent, les sauts et appels conditionnels 
permettent de sauter à (ou d’appeler) une adresse si une condition 
est réalisée. Nous avons retenu les instructions suivantes, qui sont les 
plus importantes. 


JP C, ‘‘adresse”” saute à l’‘‘adresse”” si le Carry Flag est à 1. 

JP NC, ‘‘adresse’”” saute à l’‘‘adresse”” si le Carry Flag est à 4. 

JP Z, ‘‘adresse’”” saute à l’‘‘adresse’”” si le Zero Flag est à 1. 

JP NZ, ‘‘adresse”” saute à l’‘‘adresse’”’ si le Zero Flag est à ÿ 
(nous verrons plus loin le Zero Flag (ou Flag Z), appartenant au 
registre F). 


Dans tous les cas, si la condition n’est pas réalisée, le Z89 exécute 
l'instruction qui suit le JP. 
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Les instructions CALL C, ‘‘adresse”’, CALL NC, ‘‘adresse””, 
CALL Z, ‘‘adresse’””’ et CALL NZ, ‘‘adresse’”’ appellent le sous- 
programme commençant à l’‘‘adresse””, si le flag choisi a la valeur 
voulue. 


Les instructions RET C, RET NC, RET Z, RET NZ effectuent le 
retour de sous-programme à la condition voulue. 


Nous allons voir un exemple d’utilisation de ces instructions après 
avoir introduit une seconde routine système. 


Routine de lecture de caractère sur le clavier 


Action : Fournit le premier caractère du buffer des touches du 
clavier, si celui-ci n’est pas vide. 

Adresse : & BBY9 

Entrée : Pas de conditions. 

Sortie : S’il y a un caractère, il est contenu dans A et le Carry 
Flag est à 1. 
S’il n’y a pas de caractère, le Carry Flag est à Ÿ, A est 
modifié. 
Dans tous les cas, les autres registres sont préservés. 


Programme : lire le clavier et afficher les touches appuyées 


Écrivons une routine qui attend que des touches soient frappées au 
clavier et qui les imprime aussitôt. La frappe de la touche ESC per- 
met de sortir du programme. Grâce aux instructions de sauts, appels 
et retours conditionnels, ce programme est extrêmement simple. 


Il peut s’analyser ainsi : 

- Lire une touche au clavier. 

- Si - une touche est pressée. 

- Alors - Si - Cette touche est ESC. 


- Alors - Fin. 
- Sinon - afficher le caractère. 
- Boucler. 


Voici le programme que nous placerons à l’adresse &6929 : 


Adresse Instruction Code 

&6920 CALL &BB99 &CD 
&99 adresse 
&BB 
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&6923 JP NC, &6929 &D2 
&29 adresse 
&60 


&6Ÿ26 CP &EF &FE 
&EF valeur 


&6028 RET Z &CB8 


&629 CALL &BBSD &CD 
&SD adresse 
&BB 


&692C JP &602ÿ &C3 
&29 adresse 
&69 


La première instruction appelle le programme de lecture du clavier. 
La seconde instruction saute en &692ÿ si le Carry est à Ÿ (NC), donc, 
s’il n’y a pas de caractère. La troisième instruction, CP, est une ins- 
truction de comparaison. La valeur indiquée est comparée avec 
l’accumulateur A. S’il y a égalité, le Z89 positionne le Zero Flag à 1, 
à Ÿ sinon. Ici, on compare l’accumulateur A, qui contient le carac- 
tère lu au clavier, avec la valeur ASCII de ESC qui est &EF. 


L’instruction RET Z effectue un retour de sous-programme si 
Z = 1, donc si la touche frappée est ESC. 


Toutes les conditions sont réunies ensuite, une touche a été frappée, 
ce n’est pas ESC, pour afficher le caractère. Par chance, il est 
contenu dans À (condition de sortie de la routine de lecture du 
clavier). Or, justement, la routine d’affichage affiche le caractère 
contenu dans À; il n’est donc pas nécessaire d’utiliser une instruc- 
tion de transfert. Il suffit d’appeler la routine d’affichage ; puis de 
boucler. 


Après avoir rentré ce programme, faites CALL &6ÿ2ÿ et pianotez au 
clavier. Les touches pressées sont affichées à l’écran. N’oubliez pas 
d’essayer les touches de fonctions, puis faites ESC pour sortir. 


Lexique des instructions 
les plus importantes du Z8Q 


Nous vous conseillons de vous reporter, pour chaque type d’instruc- 
tion, à l’annexe donnant la liste complète des instructions du Z8W. 


115 


Vous pourrez ainsi savoir exactement quels sont les registres ou 
adressages possibles pour chaque instruction. 


Remarque : Lorsque nous dirons qu’une instruction est ‘‘utilisable 
comme une autre””, cela ne signifiera pas que les deux instructions 
font les mêmes opérations, mais qu’elles peuvent être exécutées sur 
les mêmes ‘‘objets’” (registre, mémoire...). 


ADD. Addition 


— Addition 8 bits. 

ADD permet d’additionner à l’accumulateur A, un registre, un octet 

mémoire ou une valeur indiquée immédiatement. Le résultat est 

placé dans l’accumulateur. 

ADDB de code &89, place dans A la somme de A et B. 

ADD &1C de code &C6 &1C, place dans A la somme de A avec la 
valeur &IC. 


— Addition 16 bits. 

Certaines additions entre registres 16 bits sont possibles (voir 

annexe). 

ADD IX, BC de code &DD &99 place dans IX la somme des conte- 
nus de IX et BC. 


AND. ET logique 


Le AND s'effectue obligatoirement en 8 bits, entre l’accumulateur A 
et un registre ou un octet mémoire ou une valeur immédiate. Le 
résultat est placé dans A. 

AND (IX + &ÿ5) de code &DD &A6 &ÿ5 effectue dans A le 
ET logique de A avec l’octet pointé par IX + &ÿs. 


BIT. Test de bit 


Cette instruction permet de tester un bit d’un registre 8 bits ou d’un 
octet en mémoire. 

BIT 2, (HL) de code &CD &56 permet de tester le bit 2 de l’octet 
mémoire pointé par HL. Cette instruction positionne le flag Z à 1 si 
le bit testé est à Y, à Ÿ si le bit testé est à 1. (Le bit testé n’est pas 
modifié.) 

Exemple : 

BIT 3, A 

JP Z, & 6000 

saute en &6099 si Z = 1, donc si le bit 3 de A est à ÿ. 
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CALL. Appeler un sous-programme 


Nous avons vu plus haut les appels de sous-programmes condition- 
nels ou non. 


CP. Comparaison 


Cette instruction permet de comparer l’accumulateur A avec un 
registre, un octet mémoire ou une valeur immédiate. Elle ne modifie 
ni À, ni le registre ou l’octet comparé. Elle positionne ainsi les flags 
Cet Z. 


Z = 1si À = valeur comparée (Z = Ÿ sinon). 
C = 1 si A est inférieur à la valeur. 
C = Ÿ si À est supérieur ou égal à la valeur. 


Exemple : 

CP E de code &BB 

JP C, &6ÿ09 

saute en &6909 si C = 1, donc si le contenu de A est inférieur à celui 
de E. 


DEC. Décrémenter (enlever 1) 


Cette instruction permet de décrémenter un registre 8 ou 16 bits ou 
un octet en mémoire. 

DEC (HL) de code &35 décrémente l’octet mémoire pointé par HL. 
DEC IX de code &DD &2B décrémente le registre IX. 


IN. Entrer 


Cette instruction permet de lire le contenu d’un circuit 
d’entrée/sortie. Dans l’ Amstrad nous conseillons d’utiliser unique- 
ment l’adressage ‘‘par le registre C’’. Cette instruction permet de 
placer dans un registre 8 bits le contenu du circuit d’entrée/sortie 
d’adresse BC. 

IN E, (©) de code &ED &S58 place dans E le contenu du circuit d’E/S 
dont l’adresse est contenue dans BC. 


INC. Incrémenter (ajouter 1) 


Cette instruction, utilisable comme DEC, permet d’incrémenter un 
registre 8 ou 16 bits ou un octet mémoire. 
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JP. Sauter 


Nous avons vu les instructions de sauts conditionnels ou non plus 
haut. 


LD. Charger 


Nous avons vu cette instruction plus haut. Consultez l’annexe pour 
connaître exactement tous les adressages possibles. 


OR. OU logique 


Cette instruction, utilisable comme AND, effectue un OÙ logique 
entre À et un registre, ou un octet mémoire, ou une valeur immé- 
diate. Le résultat est placé dans A. 

OR &89 de code &F6 &89, place dans À, le OÙ logique de A avec la 
valeur immédiate &84. 


OUT. Sortir 


Cette instruction est utilisable comme IN. Elle permet de placer le 
contenu d’un registre dans un circuit d’entrée/sortie. 

OUT (C), H de code &ED &61 place dans le circuit d’E/S d’adresse 
contenue dans BC, le contenu de H. 


Les instructions PUSH (pousser ou empiler) 
et POP (tirer ou dépiler) 


Ces instructions permettent d’empiler (PUSH) ou de dépiler (POP) 
les registres 16 bits AF, BC, DE, HL, IX et IY. 


Ces instructions sont très utiles pour sauvegarder les registres dans la 
pile lors de l’appel d’une routine système, puis pour les restituer 
après l’exécution. 


Exemple : 

La routine système d’affichage sur l’écran modifie tous les registres 
du jeu principal. On veut afficher un caractère à l’écran, sans que les 
registres HL et DE soient modifiés. Il suffit de faire : 


PUSH HL de code &ES5 empile HL 
PUSH DE de code &D5 empile DE 
CALL &BBSD appelle la routine d’affichage 
POP DE de code &D1 dépile DE 
POP HL de code &E1 dépile HL 
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HL et DE ont maintenant le même contenu qu'avant l’appel de la 
routine d’affichage. 


Remarquez l’ordre dans lequel HL et DE sont ‘‘pushés’”’ puis 
‘‘popés’’. Ce n’est pas le même. 


Imaginez que la pile est une pile d’assiettes. HL contient du fro- 
mage, DE contient des légumes. Pour sauvegarder HL, on prerid 
une assiette dans laquelle on place HL (le fromage). On place 
l'assiette sur le dessus de la pile. De même pour sauvegarder DE on 
place une assiette de légumes sur le dessus de la pile, donc par-dessus 
l'assiette de fromages. 


Pour dépiler, la première assiette que l’on pourra vider sera la der- 
nière placée, donc l’assiette de légumes que l’on restituera dans DE, 
puis l’assiette de fromages dans HL. En conclusion : 

— on dépile les registres dans le sens inverse où on les a empilés, 
— Je nombre de dépilements doit être exactement égal à celui des 
empilements. Sinon gare aux indigestions ! 


RES. Placer à 9 un bit (reset) 


Cette instruction est utilisable comme BIT. Elle permet de forcer à @ 
un bit d’un registre ou d’un octet mémoire. 


RES 7, D de code &CB &BB force à 4 le bit 7 de D. 


RET. Retour de sous-programme 


Nous avons vu plus haut ces instructions. Notez l'instruction RETI 
utilisée pour le retour d’une interruption. 


Les instructions RLC (rotation à gauche) et RRC (rotation à droite) 


Ces instructions permettent de ‘‘faire tourner”” un registre 8 bits ou 
un octet mémoire. 


RLC H de code &CB &14 fait tourner H à gauche. 


Si H contient je RÉSANENSS 
il devient 91910111 
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RRC (HL) de code &CB &ŸE fait tourner à droite l’octet pointé 
par HL. 


Si celui-ci 19191911 
contient a — | 
il devient 11919191 


RST. Voir chapitre suivant. 


SET. Placer un bit à 1. 


Cette instruction est utilisable comme BIT et RES. Elle permet de 
forcer à 1 un bit d’un registre 8 bits ou d’un octet mémoire. 


SET 1, B de code &CB &CS8 force à 1 le bit 1 du registre B. 


Les instructions SLA (décalage à gauche) et SRL (décalage à droite). 


Ces instructions sont utilisables comme RLC et RRC. Elles décalent 
un registre 8 bits ou un octet mémoire. 


SLA H de code &C8 &24 décale à gauche H. 


SiH contient <4—| 19191411 |4— Ÿ 
il devient 91019110 


SRL (HL) de code &CB &2E décale à droite l’octet pointé par HL. 
Si celui-ci O—+| ] , 1 , 1 f) 11 | — 

contient 

il devient 91919101 


SUB. Soustraire 


Cette instruction permet de soustraire à l’accumulateur A un registre, 
un octet mémoire ou une valeur immédiate. Contrairement à l’ins- 
truction ADD, aucune soustraction entre registres de 16 bits n’est 
possible. 

SUB (HL), de code &9%%6, place dans A le résultat de la soustraction de 
A avec l’octet mémoire pointé par HL. 
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SUB&I1B, de code &D6&1B, place dans A le résultat de la soustrac- 
tion de À avec la valeur immédiate &1B. 


XOR. OÙ exclusif 


Cette instruction est utilisable comme AND et OR. Elle permet 
d'effectuer un OÙ exclusif entre l’accumulateur et un registre où un 
octet mémoire, ou une valeur immédiate. Le résultat est placé dans 
A. 


XOR € de code &A9 place dans A Ie OÙ exclusit de À avec C. 


Programme : Affichage de plusieurs 
caractères à l’écran. Utilisation de 
l’instruction (BASIC) CALL avec 
plusieurs paramètres 


Ce programme affiche à l’écran les caractères placés comme para- 
mètres de l’instruction BASIC. Nous l’écrirons à l’adresse &6100. 


Pour afficher BONJOUR, il faut faire : 


CALL &6109, &42, &4F, &4E, &4A, &4F, &S5, &52 
B O N J O UÙU R 


Pour écrire un mot (ou une phrase), on doit donc placer, derrière 
l’adresse du CALL, la liste des valeurs ASCII des caractères compo- 
sant le mot. Nous l’avons vu, l’instruction (BASIC) CALL, place le 
nombre de paramètres (7 dans notre exemple) dans A, et remplit 
ainsi une zone de données pointée par le registre IX. 
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IX 


(R) Dernier paramètre 


(U) 


(O) 


(J) 


(N) 


(O) 


IX + 2 x 


(nombre de caractères — 1) (B) Premier paramètre 





IX + 2 x 
(nombre de caractères) ———B 


Analyse du programme 


e Sauvegarder en mémoire, à l’adresse &8999, le nombre de para- 
mètres donc de caractères à afficher. 


Le nombre de paramètres est placé dans A par l’instruction CALL. 
Or le registre A est utilisé comme entrée de la routine d’affichage. Il 
est donc nécessaire de sauvegarder cette information en mémoire. 
Nous avons choisi l’adresse &8999. Le registre HL maintiendra cette 
adresse. 


e Calculer l’adresse du premier paramètre, c’est-à-dire du premier 
caractère à afficher. On le calcule dans IX. 


IX = IX + 2 x (nombre de caractères — 1) (voir schéma). 


e Tant qu’il y a un caractère à afficher (tant que le contenu de la 
mémoire &8909 est non nul). 

- Afficher le caractère (pointé par IX). 

- Décrémenter deux fois le pointeur de paramètres (IX = IX — 2). 
- Décrémenter le nombre de caractères à afficher (donc décrémenter 
l’octet mémoire d’adresse &8990). 
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Adresse 


&6199 


&6193 
&6194 
&6195 


&6197 
&6198 


&619A 


&619C 


(Boucle) 


&619E 
&619F 


&6112 


&6115 
&6116 


&6119 
&611A 


&611C 


&611E 
&611F 


&6122 


Instruction 
LD HL, &8900 


LD (HL), A 
DEC A 
LD B, &ÿÿ 


LD C, A 
ADD IX, BC 


ADD IX, BC 
LD A, &ÿÿ 
CP (HL) 

JP Z, &6122 


LD A, (IX + &W) 


PUSH HL 
CALL &BBSD 


POP HL 
DEC IX 
DEC IX 
DEC (HL) 
JP &619C 


RET 


Code 


&21 
&99 
&89 


_&77 


&3D 
&96 
&99 
&4F 
&DD 
&#9 
&DD 
&99 


&3E 
&09 


&8E 
&CA 


&22 
&61 


&DD 
&TE 
&99 
&ES 


&CD 
&SD 
&BB 


&E1 


&DD 
&2B 
&DD 
&2B 
&35 


&C3 
&YC 
&61 


&C9 


Valeur 


Valeur 


Valeur 


Adresse 
(Fin) 


Déplacement 


Adresse 


Adresse 
(Boucle) 


(Fin) 


Remarquez que nous avons sauvegardé HL lors de l’appel de la rou- 
tine d’affichage. En effet, cette routine modifie les registres du jeu 
principal. En revanche il n’est pas nécessaire de sauvegarder IX. 


Faites CALL &6109, &42, &4F, &4E, &4A, &4F, &S55, &52. 
BONJOUR est affiché. 
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Faites d’autres essais pour vérifier que vous pouvez afficher des 
mots ou phrases de longueurs différentes. En particulier, essayez 
simplement CALL &6190. Le programme que nous avons écrit véri- 
fie, avant d’afficher un caractère, qu’il y en a bien un à afficher. 


Conclusion 


Vous le voyez, un programme équivalent à un simple PRINT néces- 
site une trentaine d’octets (et encore, en appelant une routine 
système !). 

A vous de doser dans vos programmes le mélange BASIC-langage 
machine. La présentation du langage machine Z89, et celle des routi- 
nes système de l’Amstrad qui va suivre, doivent vous permettre 
d’enchaîner des routines là où c’est absolument nécessaire. Nous ne 
vous conseillons pas de vous lancer dans d’énormes programmes 
machine (sauf si vous disposez d’un assembleur). 


Maintenant, à vous de jouer. Apprendre le langage machine du Z89 
vous permettra de mieux connaître votre Amstrad, et aussi d’appré- 
cier l’extraordinaire puissance d’un langage évolué comme le 
BASIC. 
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Chapitre VII 
Adresses Système 





Les instructions RESTART 
dans l’ Amstrad 


Le Z89 présente huit instructions RESTART d’un seul octet de code 
machine, qui permettent d’appeler des programmes à une adresse 
bien déterminée. RST 9, RST 1, RST 2, RST 3, RST 4, RST 5, 
RST 6 et RST 7 appellent les programmes commençant aux adresses 


0000, &V0V8, &OV10, &OV18, &O020, LOV28, &OP30 et LOV38. 


Rappelez-vous, ces adresses se situent dans la ZONE SYSTÈME. 
Nous avions dit que les 64 premiers octets de la ROM basse étaient 
recopiés dans la ZONE SYSTÈME RAM. Ainsi, quel que soit l’état 
de la sélection de la mémoire basse (soit la ROM basse, soit la RAM 
basse) une instruction RST provoque toujours le même traitement. 


Les traitements effectués sur les instructions RST sont fondamen- 
taux pour le fonctionnement de l’Amstrad. Ils se classent en deux 
familles. 
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Restarts “‘système’” 


RST ÿ (&9999). L’initialisation 


Par la force des choses (du Z89) cette instruction, provoquant 
l’appel du traitement en &990, réinitialise complètement l’ Ams- 
trad. En effet lors de la mise sous tension, le Z8Ÿ se branche automa- 
tiquement à l’adresse &9999. Le programmeur doit donc placer 
à cette adresse son programme d’initialisation. La (ré)initialisation 
a pour effet d’effacer complètement le programme BASIC en 
mémoire, d’annuler toutes les redéfinitions de touches, de caractè- 
res... Elle exécute aussi une réinitialisation des circuits 
d’entrée/sortie. 


RST 7. (&9938). Interruption 


Nous l’avons vu, le Z8Ÿ de l’ Amstrad est programmé en mode 1. 
Ainsi, toutes les interruptions provoquent l’exécution du pro- 
gramme commençant à l’adresse &9938. 


RST 6. (&9939). Utilisateur 


L’instruction RST6 de code &F7 est laissée à l’utilisateur. Celui-ci 
peut donc placer aux adresses &ÿ939 jusqu’à &9937 le début d’un 
programme. Une instruction RST est idéale pour réaliser les ‘‘points 
d’arrêt’”’ dans un debugger. Nous vous proposons dans notre pro- 
gramme MONITEUR cette utilisation de RST6. 


(Bien que le programme utilisateur placé sur RST6 ne puisse être 
recopié en ROM, il est possible quand même d’effectuer à tout ins- 
tant un RST6, donc même si la ROM basse est sélectionnée. Le pro- 
gramme RST6 placé en ROM se charge de sélectionner la RAM 
basse et de faire exécuter le programme utilisateur en RAM.) 


La navigation dans la mémoire 


Les autres instructions de RESTART sont utilisées dans l’ Amstrad 
pour la navigation dans la mémoire. Celle-ci, a priori, n’est pas 
si simple que cela, puisque le microprocesseur a le choix entre 
64 k-octets de RAM et de nombreux boîtiers de ROM. Les instruc- 
tions RESTART permettent d’appeler un programme, non seule- 
ment en précisant son adresse, mais aussi le boîtier (ROM ou RAM) 
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où il se trouve. Bien sûr, en fin d’exécution du programme appelé, 
l’état initial de la sélection des boîtiers est restitué, ce qui évite bien 
des soucis au programmeur ! 


RST 1. (&9998). Saut à un programme en mémoire basse 


Cette instruction est utilisée dans l’ Amstrad pour sauter à un pro- 
gramme placé en mémoire basse. Pour cela on doit faire suivre le 
code machine de RST1 (&CF) de deux octets précisant l’adresse de la 
routine en mémoire basse où sauter, et l’état voulu des boîtiers. Le 
format est le suivant : 


&CF, poids faibles ‘‘adresse’”’, poids forts ‘‘adresse’” + sélection. 


Les deux octets doivent être ainsi constitués. 


Adresse du programme 


A 


Poids forts Poids faibles 


Les quatorze bits de droite indiquent l’adresse de la routine. Cette 
adresse est donc comprise entre &900 et &3FFF, ce qui correspond 
bien à la mémoire basse. 


Le bit L (Low) indique à 1 que le programme appelé se trouve en 
RAM basse, à Ÿ qu’il se trouve en ROM basse. 


Le bit U (Upper) permet de plus au programme de valider (avec 
U = 1) la RAM haute, ou la ROM haute (avec U = ). 


Exemples 
&CF &39 &08 est un RST1 avec 9 0 &0830 


Cette instruction a pour effet de sauter au programme d’adresse 
&839 se trouvant dans la ROM basse. La ROM haute, sélectionnée à 
cet instant, est validée. 


&CF &39 &CS8 est un RSTI1 avec 1 1 &ÿ830 


Cette instruction a pour effet de sauter au programme d’adresse 
&830 se trouvant dans la RAM basse. La ROM haute est invalidée. 


RST 2. (&9919). Appel voisin 


Cette instruction peut être utilisée dans des programmes en exten- 
sion, occupant jusqu’à quatre ROM voisines. Elle permet d’appeler, 
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à partir d’une des quatre ROM, un programme dans une de ces 
ROM sans préciser la sélection des boîtiers. Cette sélection est effec- 
tuée à partir de l’adresse ‘‘64 K’” fournie. L'utilisateur ne peut pas 
s’en servir. 


RST 3. (&9918). Appel en tout endroit 


Cette instruction permet, dans l’ Amstrad, d’appeler un programme 
n’importe où en RAM, ou dans n’importe quel boîtier ROM. Pour 
cela, on doit faire suivre l’instruction RST3 (de code machine &DF) 
de deux octets donnant l’adresse de ‘‘l’adresse lointaine’”. Le format 
de l’‘‘adresse lointaine’” est le suivant : 

Octet 1 : poids faibles de l’adresse du programme à appeler. 

Octet 2 : poids forts de l’adresse du programme à appeler. 

Octet 3 : validation - sélection des ROM. 


Ce dernier octet a la signification suivante : 
— de &ÿ9 à &FB : la ROM haute du numéro donné (Ÿ à 251) est 
sélectionnée et validée. La ROM basse est invalidée. 
— de &FC à &FF : la sélection de la ROM haute n’est pas modifiée, 
mais l’état validé-invalidé des ROM basse et haute est ainsi modifié. 
- &FC ROM haute validée, ROM basse validée. 
- &FD ROM haute validée, ROM basse invalidée. 
- &FE ROM haute invalidée, ROM basse validée. 
- &FF ROM haute invalidée, ROM basse invalidée. 


Exemple 


&DF &39 &Ÿ8 appelle le programme dont l’‘‘adresse lointaine’’ est 
placée à l’adresse &830. 


Si l’on a placé à cette adresse &W2, &D8, &4ÿ, on appelle le 
programme placé à l’adresse &D892 dans la ROM &49 (64), et la 
ROM basse est invalidée. 


Si l’on a placé à cette adresse &Ÿ2 &28 &FF, on appelle le 
programme placé en RAM à l’adresse &2892. Les ROM haute et 
basse sont invalidées. 


Vous remarquez que cette instruction peut servir uniquement à 
valider une ROM durant le temps d’exécution d’un programme en 
RAM. 


Ainsi, si on utilise toujours l’adresse &839 pour placer l’adresse loin- 
taine et si on y place &00, &69, &FC, un RST3 &839 fait exécuter le 
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programme placé en &69%9 (donc en RAM), avec ROM haute et 
basse validées. 

Dans notre MONITEUR, nous utilisons ainsi le RST3 pour pouvoir 
lire (‘‘dumper’”’) les ROM, auxquelles on n’a pas “normalement”? 
accès dans un programme BASIC. (L’instruction PEEK va toujours 
lire la RAM, elle utilise d’ailleurs probablement le RESTART 
suivant.) 


RST 4 (&9929). Lecture de la RAM 


Cette instruction de code &E7 est équivalente dans l’ Amstrad à l’ins- 
truction LD A, (HL), excepté qu’elle charge toujours dans l’accu- 
mulateur le contenu de la RAM pointée par HL, quel que soit l’état 
de validation des ROM. 


Exemple 
LD HL, &3009 
RST 4 


place dans A le contenu de la RAM d’adresse &3009, même si à ce 
moment la ROM basse est validée. 
RST 5. (&9928). Saut vers le firmware 


Cette instruction est similaire à RST 1. Elle permet de sauter à un 
programme se situant soit dans la RAM moyenne, soit dans la ROM 
basse. La ROM haute reste dans l’état où elle était. La ROM basse 
est validée. 


Cette instruction doit son nom au fait qu’elle est extrêmement prati- 
que pour sauter à un programme de la ROM système (firmware). 


Le code de l'instruction (&EF) doit être suivi de l’adresse du 
programme. 


Exemples 
&EF &39 &ÿ8 saute au programme d’adresse &839 de la ROM 
basse. 


&EF &39 &58 saute au programme d’adresse &5839 de la RAM 
moyenne. La ROM basse est validée. 
Remarques 


— Les instructions RSTI1 et RSTS sont équivalentes à des sauts et 
non à des appels. Pour appeler une routine système, 1l suffit d’appe- 
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ler le programme effectuant le saut (RST1 ou RSTS) à la routine 
système voulue. 

— Les adresses de routines système que nous allons maintenant 
vous donner ne sont pas réellement les adresses en ROM des routines 
système. Ce sont les adresses dans la zone RAM, BLOC DE SAUTS, 
des instructions de sauts aux routines système. Ces instructions de 
sauts utilisent les RESTART 1! et S. 


Vous n’avez donc pas à vous soucier, pour utiliser les routines 
système, de l’état de la sélection de la ROM et de la RAM. Il suffit de 
sauter à (JP), ou d’appeler (CALL) les adresses que nous indiquons. 


Quelques sous-programmes 


La liste des sous-programmes machine qui suit vous permettra 
d’augmenter vos possibilités de programmation. En effet, la plupart 
des sous-programmes présentés ne trouvent pas leurs équivalents 
dans la panoplie des instructions BASIC. Nous avons cependant 
indiqué quelques sous-programmes équivalents à une instruction 
BASIC, mais dont la rapidité d’exécution peut être ‘‘critique”’. 
Nous avons précisé dans ces cas l’instruction BASIC correspon- 
dante. 


Action : Lecture ou attente d’une touche en provenance du 
clavier. 


Adresse : &BB18 
Entrées : — 


Sorties : Le code de la touche est dans l’accumulateur A. 
Le ‘‘Carry Flag’” est à 1. 


Action : Lecture d’une touche en provenance du clavier. 
Adresse : &BB1B 

Équivalent : INKEYS 

Entrées : — 
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Sorties : 


Action : 


Adresse : 
Entrées : 


Sortie : 


Action : 
Adresse : 
Entrées : 


Sorties : 


Action : 


Adresse : 
Entrées : 


Sorties : 


Action : 


Adresse : 
Entrées : 


Sorties : 


Action : 


Adresse : 
Entrées : 


Sorties : 


Si une touche est appuyée. 

Alors - le code de la touche est dans l’accumulateur A, 
- Je ‘Carry Flag’” est à 1. 

Sinon - l’accumulateur À est détruit, 
- le ‘Carry Flag”” est à ÿ. 


Autorisation de recevoir un ‘‘break’”’. 
&BB45 


L’adresse du sous-programme de ‘‘break’” se trouve 
dans le registre DE 

Le registre C contient l’adresse de sélection de la 
mémoire morte. 


Les registres AF, BC, DE, HL sont détruits. 


Interdiction de recevoir un ‘‘break”’. 
&BB48 


Les registres AF et HL sont détruits. 


Simulation d’un ‘‘break’” puis interdiction de recevoir 
un ‘‘break”” ultérieur. 


&BB4B 


Les registres AF et HL sont détruits. 


Initialisation totale de l’écran texte. 
&BB4E 


Les registres AF, BC, DE et HL sont détruits. 


Autorisation/Interdiction d’écrire des caractères sur le 
canal en cours. 


&BB54/&BB57 


Le registre AF est détruit. 
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Action : 


Adresse : 


Équivalent : 


Entrées : 


Sorties : 


Action : 
Adresse : 


Équivalent : 


Entrées : 


Sorties : 


Action : 
Adresse : 


Équivalent : 


Entrées : 


Sorties : 


Action : 
Adresse : 
Entrées : 
Sorties : 


Action : 
Adresse : 
Entrées : 
Sorties : 


Action : 
Adresse : 


132 


Écrire un caractère sur l’écran et exécuter la fonction 
correspondante au code si la valeur du caractère est 
inférieure à 32. 


&BBSA 
PRINT à l'écran. 


Le caractère à afficher se trouve dans l’accumulateur 
A. 





Écrire un caractère sur l’écran. 
&BBSD 
PRINT à l’écran sous mode graphique. 


Le caractère à afficher se trouve dans l’accumulateur 
A. 


Les registres AF, BC, DE et HL sont détruits. 


Positionnement du curseur dans la fenêtre en cours. 
&BB75 
LOCATE 


Le numéro de colonne est dans le registre H. 
Le numéro de ligne est dans le registre L. 


Les registres AF et HL sont détruits. 


Inversion vidéo en mode texte sur le canal en cours. 
&BB9C 


Les registres AF et HL sont détruits. 


Initialisation totale de l’écran graphique. 
&BBBA 


Les registres AF, BC, DE et HL sont détruits. 


Positionnement absolu/relatif du curseur graphique. 
&BBCY/&BBC3 


Équivalents : 


Entrées : 


Sorties : 


Action : 


Adresse : 
Entrées : 
Sorties : 


Action : 
Adresse : 
Entrées : 


Sorties : 


Action : 


Adresse : 
Entrées : 
Sorties : 


Action : 


Adresse : 


Équivalents ; 


Entrées : 


Sorties : 


MOVE/MOVER 


Le registre DE contient l’abscisse absolue/relative du 
curseur. 

Le registre HL contient l’ordonnée absolue/relative 
du curseur. 


Les registres AF, BC, DE et HL sont détruits. 


Effacement de l’écran. L’écran prend la couleur de 
l’encrier zéro. 


&BC14 


Les registres AF, BC, DE et HL sont détruits. 


Colorie un rectangle sur l’écran. 

&BC44 

Le registre A contient la valeur de l’encre à utiliser. 
Les registres H, D, L et H contiennent les informa- 


tions sur la taille et la position du rectangle selon le 
principe utilisé par l’instruction WINDOW. 


Les registres AF, BC, DE et HL sont détruits. 


Effacement de la fenêtre graphique. La fenêtre prend 
la couleur du papier. 


&BBDB 


Les registres AF, BC, DE et HL sont détruits. 


Allumage d’un point absolu/relatif de l’écran graphi- 
que. 

&BBEA/&BBED 

PLOT/PLOTR 

Le registre DE contient l’abscisse absolue/relative du 
point. 

Le registre HL contient l’ordonnée absolue/relative 
du point. 

Les registres AF, BC, DE et HL sont détruits. 
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Action : Tracé d’une droite en coordonnées absolues/relatives. 
Adresse : &BBF6/&BBF9 
Équivalents : DRAW/DRAWR 


Entrées : L’abscisse absolue/relative de l’extrémité de la droite 
est dans le registre DE. 
L’ordonnée absolue/relative de l’extrémité de la 
droite est dans le registre HL. 


Sorties : Les registres AF, BC, DE et HL sont détruits. 


Moniteur avec points d’arrêt 





En conclusion de ce chapitre, nous vous proposons ce moniteur qui 
vous permettra de faire la mise au point de vos programmes écrits en 
langage machine. Il offre les fonctions suivantes : 


— dump ou visualisation de la mémoire RAM et ROM. Vous frap- 
pez D, puis vous indiquez les adresses de début et de fin de la zone 
que vous voulez visualiser. Le moniteur affiche, par lignes de huit 
octets, le contenu de la mémoire. 


— choix de la ROM ou de la RAM pour le dump. Vous frappez €, 
puis N (pour Non) si la mémoire actuellement sélectionnée ne vous 
satisfait pas; 


— modification de la mémoire. Vous frappez M, vous indiquez 
l’adresse de l’octet que vous désirez modifier, puis la nouvelle valeur 
de l’octet. Le programme vous propose alors de modifier l’octet sui- 
vant, et ainsi de suite jusqu’à ce que vous frappiez X (pour sortir de 
la fonction) ; 


— lancement d’un programme, avec ou sans point d’arrêt, à partir 
ou non d’un point d’arrêt. L'utilisation la plus simple de cette fonc- 
tion consiste à lancer un programme en indiquant uniquement son 
adresse de début, sans indiquer l’adresse de fin. Le moniteur lance 
alors ce programme jusqu’à son exécution finale. Il est aussi possible 
d’indiquer l’‘‘adresse de fin’ d’un point d’arrêt. Celui-ci doit obli- 
gatoirement se trouver en début d’une instruction machine, afin de 
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pouvoir fonctionner correctement. Le programme est exécuté 
jusqu’à cette instruction ; il est ensuite possible de le relancer à partir 
de cette instruction (en indiquant ou pas un nouveau point d’arrêt). 
L'état des registres du Z8ÿ est sauvegardé lors de l’exécution du 
point d’arrêt, puis restitué lors du redémarrage à partir de ce point, 
ce qui rend possible l’utilisation d’un point d’arrêt en tout endroit de 
votre programme ; 


— visualisation du contenu des registres après un point d’arrêt. 
Vous frappez KR, l’état des registres AF, BC, DE, HL, IX, IY, PC et 
SP est affiché. C’est l’état des registres du Z89 au moment du der- 
nier point d’arrêt que vous avez effectué. 


Voici un exemple d’utilisation du moniteur : vous voulez écrire le 
programme suivant à l’adresse &8599. 


&8500 &i1 &fY &ÿ2 LD DE, &2ÿ9 abscisse 
&8503 &21 &O &ÿl LD HL, &149 ordonnée 
&8506 &CD &F6 &BB CALL &BBF6 tracé de droite 
&8599 &C9 RET 


La fonction M vous permet d’entrer le code de votre programme. La 
fonction D permet de vérifier que le contenu de la mémoire située 
eñtre &8509 et &8599 est correct. 


Vous pouvez alors lancer le programme en frappant L, en indiquant 
l’adresse de début — 8599 —, et en n’indiquant pas l’adresse de fin. 
Le programme est entièrement exécuté; la droite est tracée. 


Vous pouvez aussi, pour vérifier que vos instructions sont correctes, 
exécuter ce programme avec des points d’arrêt. Pour cela, vous lan- 
cez le programme à partir de l’adresse de début — 8599 — jusqu’à 
l’adresse de fin — 8593 —, début de la seconde instruction. Vérifiez 
ensuite, en frappant R, que le contenu de DE est bien &2ÿ9. Relan- 
cez le programme à partir du point d’arrêt en frappant L et en 
n’indiquant pas d’adresse de début (vous ‘‘conservez”? l’adresse de 
début proposée — 8593 — en frappant ENTER directement lorsque 
le programme vous demande l’adresse de début). Indiquez l’adresse 
du point d’arrêt — 8596 — (début de la troisième instruction) lors- 
que le moniteur vous demande l’adresse de fin. Vous pouvez vérifier 
ensuite que le contenu de HL est bien &149 en frappant KR. 


Relancez le programme pour exécution complète en frappant Leten 
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n’indiquant ni l’adresse de début, ni l’adresse de fin (frappez deux 
fois ENTER). La droite est tracée. 


Toutes les valeurs doivent être fournies en hexadécimal, sans le 
caractère ‘‘&’” ; les lettres doivent être frappées en minuscules. 


L] 
= Qu un ue ue dm ue un cm eu cu um um un um <n fume es ue mu — = me es > = cm cm mp mm 
EEE === E==-=-=-= === === 


Î 

2 ‘= moniteur pour programmes machine = 

D ====2SS22=S===============2=mE==S==-- 

4 

5 GOSUKR 1000 ‘initialisation 

7 - 

8 boucle principale 

Q mm mms — un ue = 

10 com$=INKEYS ” lecture commande 


20 IF com$="m" THEN GOSUR 2000: GOSUR 10000 ‘modification memoire 
SO IF com$="d" THEN GOSUKR 35000: GOSUB 10000 ‘dump memoire 

40 IF com$="r" THEN GOSUR 4000: GOSUH 10000 ‘valeur registres 

90 1F com$="l1" THEN GOSUB 5000: GOSUR 10000 ‘lancement programme 
6 IF com$="c" THEN GOSUR 6000: GOSUR 10000 ‘choix memoire 

70 IF com$<:"x" THEN GOTO 10 


98 

Li A sortie du debugger 

100 = —— 

110 END 

997 

998 ‘ initialisation 

999 ------—— 

1000 MODE 1:INK O,1:INK 1,24:INK 2,0:INK 3,6 ‘mode et couleurs 
1005 WINDOW #0,1,40,2,22 fenetre centrale 
1010 WINDOW #1,1,40,23,25 fenetre menu 
1015 WINDOW #7,1,40,1,1 fenetre presentation 
1020 HORDER 9 

1025 PAPER #O,O:PEN #O,1:3CLS #0 caracteres © 
1030 PAPER #1,2:PFEN #1,3:CLS #1 caracteres 1! 
1035 PAPER PSE #7,35:CLS #7 caracteres 7 
1040 PRINT #7,'"moniteur memoire de BGO0 a 9c00" 

1045 MEMORY &8000 ‘reservation memoire machine 
1050 mem=0 selection ram pour dump 

1088 * 

1089 ‘ programme machine en data 


1090 DATA &RaQ,rk9c.k&cs, LÉO, 89c 

1100 DATA &OO,800,%00, 8400, &O00, &OO0, &OO, &OO 
1110 DATA 8&OO, 400, &OO,8&OO,8RO0O,&B80,%fe,49f 
1120 DATA %OO,%O0O0,800,800,8&d0,%9c,.%4fc, KOO 
1130 DATA &cb.,8&4f,&ca,t14,.89c,k&dd,866.805 
1140 DATA &dd.tée, &O02 ,#22.%8c, KLIe,.t21.8tfe 
1150 DATA &9f,8422.,8&8e.,k9e,%cb,8&47,&ca,.®25 
1160 DATA t9c.tdd,.té66,401,&dd, tée, &O00, 47e 
1170 DATA L:2,892,8k9e,RkS6,kf7,%ed,&73, 90 
1190 DATA 9e, Ked,&7/7b, Be, &9e, k2a.k8c.t9e 
1190 DATA L&eS5,&2a,tBa.kSe,kes,8&fi,ked, &4b 
200 DATA &80,28&9e,&ked, &5b,8482,&9e, &2a,<84 
1210 DATA &9e,&dd.,t&2a,.t86,&k9e,tkfd,t&2a,t88 
1220 DATA &9e,%tc9,&O00, 400,800, 400, 800, &OO 
1230 DATA &OO0,L&O0,8&00, 400, %OO0, &OO, &OO0, LOO 
1240 DATA &OQ, OO, %OO, OO, &OO, &OO, LOOQ, KOO 
1250 DATA &ed,&45,8&B0,28&9e,tked.,8&S53,8&82.,29e 
1260 DATA 22,484, t9e, Kdd, 422,886,%9e,%fd 
1270 DATA &22,888,%9e, tf5,tei, &L22,8&8a,t9e 
1280 DATA &ei.,&2b,8422,4&8c,t49e, Led, &73, 8e 
1270 DATA &9e,L&Sa,k92,%9e,&k77,8c3S,taO,&9c 
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1Z700 
1310 
1320 
1330 
1540 
1350 
1360 
1570 

380 
1390 
1400 
1408 
1409 
1410 
1420 
1429 
1430 


1440. 


1449 
1450 
14860 
1469 
1470 
1480 
1499 
1500 
1510 
1888 
18989 
1900 
1776 
1977 
1998 
1999 
2000 
2010 
2020 
2050 
2028 
2059 
2100 
2105 
2110 
2120 
2130 


2140 


2150 
2160 
2996 
2997 
2998 
2999 
3000 
S010 
3020 
3030 
53040 
3050 
3098 
3099 
3100 
sito 
3120 
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DATA OO, OO, &OO, LOO, KOO, LOO, &OO , KO 
DATA &O0,ROO0, RO, LOO, OO, 800,800, &O0 
DATA 400,800, 800,800,&O00,&O00,%&O0,&OC0 
DATA &ed,t7b. &«90,89e.,&kc9, LO0,2&00,&OC 
DATA &OO, RO, LOO, LOO, &OO , LOO, 400, &O0O 
DATA &O0, KOO,RO0, &LOO, &OO, KLOO, &OO0, LOU 
DATA RON, LOO,RO0,ROOQ,&OO,ROO,2&00,8&O00Q 
DATA &df,494,89e,kc9, &OOQ 4 ROO, &OO: LOO 
DATA LOO, OO, &OO, &OO, 800, &OO, &OO0, &O00 
DATA &dd,tée.&OO,&dd,.8é8,&O1,8&7e., &32 
DATA &L9B,%9e,t&c9,200,2800,800,8&00,&00 


adresse retour basic sommet pile machine 
adresse=t9FFE: adresse=adresse+2"16 
FOR 1=1 TO 2: GOSUR 19OO:NEXT 
“instruction en &7O (saut de KST 6) 
adresse=®30 

FOR 1=1 TO 3: GOSUR 1900:NEXT 
‘donnees et adresse lointaine 
adresse=t9E80: adresse-adresse+2 16 
FOR i=1i TO 24: GOSUR 19O0:NEXT 
‘programmes 

adresse=t9CO0û: adresse=adresse+2? 16 
FOR i=1 TO 224: GOSUKR 19O00:NEXT 


GOSUEH 10000 “affiche menu general 
RETURN 


sous-programme entree programme machine 
KEAD a:FOKE adresse,a:adresse=adresset+i:RETURN 


=. moe ce otett me me de cute me tte um um ue mme mms mu te dant ue se + cn um 
=== =============—= === —=— 


Von mue um ot ne quum voue ue mue mue monte mue tee tt de 00 ne um us ue mn ce 0 
EE ——— 


GOSUB 10100 ‘affiche menu 
INPUT ‘"adresse'":a$: IF a$="»x" THEN RETURN 
GOSUR 11000: IF erreur=1 THEN GOTO 2010 
adresse=a-i 

boucle d'entree des valeurs a partir de l'adresse 
adresse=adresset+i 
FRINT HEX$(adresse)" :": ‘affiche adresse 
a=FEEr (adresse): FRINT HEX$(a)" ."; ‘ancien contenu 
INPUT'ok'":a$: IF a$="»" THEN RETURN 


IF a$='"'" THEN GOTO 2100 ‘pas de modification 
GOSUR 11000:IF erreur=1 OR a:tFF 

THEN GOTO 2120 conversion et controle 
POKE adresse, à "prise en compte 
GOTO 2100 adresse suivante 
== === 


GOSUB 10200 

INPUT ‘debut'"':a%$: IF a$="»" THEN RETURN 

GOSUR 110900: IF erreurzi THEN GOTO 3010 ELSE deb=a 
INFUT ‘fin  ‘“"s:a$: IF a$="x" THEN RETURN 

GOSUR 11000: IF erreur=1 THEN GOTO 23030 ELSE fin=a 
IF fin<deb THEN GOTO 3010 


affichage des octets memoire d'adresses deb a fin 
FKINT HEX$(deb, 4)" 4 ‘atfiche le-e adresse 
deb=deb-i: long=fin-deb 
FOR 1=1 TO long 
debzdeb+i 
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3150 
3140 


S150 
3160 
3170 
3800 
5996 
5997 
3998 
3999 
4000 
4010 
4020 
4030 
4035 
4040 
4050 
4060 
4070 
4080 
4898 
4899 
4900 
4910 
4920 
4930 
4996 
4997 
4998 
4999 
3000 
5005 
9010 
3020 
3030 
0040 
3050 
5060 
5070 
3080 
9090 
9099 
9100 
9110 
9120 
5130 
5140 
5996 
5997 
5998 
0999 
6000 
68010 
6020 
68030 
6040 
8999 
3000 
9001 
9002 
9989 
9990 
9991 
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IF deb-B8xINT(deb/8)=0 AND 11 


THEN PRINT: FRINT HEX$(deb. 4)" "; affiche adresses =48 
IF mem=0 
THEN cnt=PEEK (deb): GOTO 3140 ‘peek en ram 
CALL &9CCOQ, deb: cnt=FEERk (%£9E98) "lecture rom 
PRINT HEXS$(cent,2)" ": ‘affiche contenu 
NEXT 


RETURN 


No un me mme me une tt méte mt ms moe mp ous mu mn us et ue ie ce cn mme 
EE — 


Ou = ee ee en eu Om mue mu mm mu que eg + au eue ue ue ue en un ee 
EE ———— 


PRINT "AF=":: adresses£$&9E8A: GOSUKH 4900 
FRINT "RC=";: adresse=t&9E80: GOSUKH 4900 
PRINT ‘"DE="3} adresse=8&9E82: GOSUB 4900 
FRINT "HL='";: adresse=8&9E84: GOSUEH 4900 


adresse=£&9E86: GOSUE 4900 
adressez:&9E88: GOSUR 4900 
adresse=&9E8E: GOSUK 4900 
adresse=t&9E8C: GOSUK 4900 


PRINT “"IX="; 
PRINT “IY="; 
PRINT "SP="; 
PRINT "“PC="; 
RETURN 


affiche contenu de l'adresse (contenant registre) 
adresse=adresse+2" 16 

a=FEEK (adresse+1): PRINT HEXS(a.2);: 

a=PFEEK (adresse): FRINT HEX$(a,2)" ": 

RETURN 


= mm —— 


GOSUR 10400 
FRINT ‘"ad.debut ‘“:;:adresse-=&9E8C: GOSUK 4900 ‘affiche ad.debut 
INPUT ‘“ok'";a$: IF a$="x" THEN RETURN 


IF a$="" THEN nbp=0G: GOTO 5050 ad.deb pas modifiee 
GOSUR 11000: IF erreur=1 THEN GOTD 5010 

nbp=2: deb=a ‘ad.deb modifiee 
INPUT ‘“ad.fin “sa$: IF a$="»:" THEN RETURN 

IF a$="" THEN GOTO 5100 ‘pas d'ad.fin 

GOSUR 11000: IF erreur=1 THEN GOTDO 5050 

nbp=nbp+i: fin=a ‘point d'arret 


lancement du programme 
1F nbpe=eQU TMEN CALL %9CO0 
IF nbp=1i THEN CALL &9C00,+tin 
IF nbp=2 THEN CALE &9CO00, deb, 0 
IF nbp=7 THEN CALL &9CO0,0,.deb.fin 
RETURN 


— mm mme mur mu mu us ue mu uw mn un ms eu us me <e mu un ne ue us + mue 
=== ======== === 


choix memoire 


GOSUR 10500 

IF mem=0 THEN PRINT ‘“ram'; ELSE FRINT ‘“rom'; 
INFUT " ‘"sa$: IF a$<>"n" THEN RETURN 
mem=mem+i: IF mem=2 THEN mem=0 

GOTO 6010 


. 
È = == = en mme cs mn un mes ue mn ee ee un mn mue me mn mn du me + mo 
EEE ========--==—- 


sous-pr ogr ammes 


ee ee me ee ee me me ee me ue en ee ee ee 


mm me = ne = ee = = = = = ee ee 


9992 
9998 
9999 
10000 
10010 
10020 
10030 
10040 
10097 
10098 
10099 
10100 
10110 
10120 
10130 
10197 
10198 
10199 
10200 
10210 
10220 
10230 
10240 
10250 
10597 
10598 
10599 
10400 
10410 
10420 
10430 
15440 
10497 
10498 
10499 
10500 
LOTO 
10520 
19530 
10994 
10995 
10996 
10997 
10798 
10999 
{toOc) 
1:+6r10 
11020 
11050 
11040 
11050 
11060 
11070 
11080 
49988 
49989 
90000 
50001 
30004 
50005 
50010 
90020 
50021 
30022 
90020 


= 


menu geñeral 


PRINT #1,"C cho1»: D dump L lancement” 
PRINT #1,'"M modification R registres" 
PRINT #1,°X fin 


RETURN 


menu modification 


CLS #1 ! 

PRINT #i.'"indiquer adresse puis valeurs” 
PRINT #1,'"X fin‘: 

RETURN 


menu dump 
CLS #1 
FRINT #1.,'memoire actuelle ‘: 
IF mem=0 THEN FRINT #1,'"RAM'" ELSE PRINT #1,'"ROM' 
FRINT #1.'"indiquer adresses 
PRINT #1,"X fin" 
RETURN 


menu lancement 


2 


FRINT #1,'autre adresse debut où enter" 

PRINT #1,'adresse fin (point arret) où enter" 
FRINT #1,"X fin” 

RETURN 


menu Choix 


mme mm mm — 


CLS #1 

PRINT #1.'"frapper N pour modifier le choix" 
PRINT #1,'"une autre touche fin: 

RETURN 


conversior chaine de caractere en valeur 


entree a$: csortie a où erreur = 1 

erreur © O1 ]Ja-LEN(a$) ‘controle lonqueur 

IF 1g9:4 UÜR lg=0 THEN erreur = 1: RETURN 

FOR 1=i TO lg ‘controle que les 
ca$=MID$(a$,1,.1+1): ca=ASC(ca$) ‘caracteres 
IF ca<48 OK ca:102 THEN erreur = 1 sont entre © et ? 
IF ca>57 AND ca<97 THEN erreur = 1 ‘ou à et f 

NEXT ‘puis convertit 


IF erreur = © THEN a=VAL("k'+a$%): IF a<O THEN aza+? ‘16 
RETURN 


SELLE === 

* programmes machines 

Tes====-=sss=----sses——— 

3 

* la memoire de 9c00 ---; 9fff est reservee au moniteur 


pile du moniteur 


FO RS en ue ue un un ue ee us lu mu mu mue ue Me mue Me dau eue du 
ee 


, 


elle est placee de 900 a 9f#f# 
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90040 
50050 
30060 
90070 
50090 
50100 
90101 
90102 
290110 
50115 
50120 
50130 
50140 
50150 
50160 
90170 
50180 
30190 
50195 
90200 
50210 
50215 
022 
00225 
90230 
SO0235 
50240 
50250 
90270 
90300 
90301 
50302 
90310 
50311 
50320 
50Z30 
50340 
50341 
50350 
50360 
50370 
S03BO 
0390 
50400 
50410 
50415 
50420 
50430 
50440 
50450 
50460 
950470 
50480 
50485 
50490 
30500 
50510 
50520 
50530 
90540 
50550 
50560 
50570 
50580 


50390 
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» 


? 


’ 


» 


» 


» 


>» 


» 


» 


Ê] 


» 


le sommet de la pile contient l'adresse du programme 
effectuant le retour d'un programme machine vers le 
, ce programme est place en 9ca0Q 


BASIC 
en 9$f 


| 


---> 9c, 


donnees moniteur 


STL=EZ====LIL===E LEE 


pour point 
sauvegarde 
sauvegarde 
sauvegarde 
sauvegarde 
sauvegarde 
sauvegarde 
sauvegarde 
sauvegarde 


sauvegarde 
sauvegarde 


IY 
AF 
PC 
SF 


en fffe 


d’arret 


——-}> aùd 


(adresse debut) 
(pile debugger) 


2. pour lecture ROM 


ee em me ce me me me me me me me me ne me de me de me 


9e94 ©S 


en 9e94 


octets de 
le programme est 
—--> dO, 
Se98 resultat de 


programmes 


=æss==<z==ss=2z=- 


saut sur KRST 6 


situe en 9cd0, 
9e95 ---;: 
la lecture de 1a RDM 


SP du BASIC M 
octet ecrase par KRST 6 


9c. 9e96 


x “contexte” 
X ‘machine’ 


+ x 6 +» 


l’adresse lointaine appelee sur RST ZT 
les ROOMS sont validees 


fc 


saut au traitement 


— mu me mue mu + ne ne ne mu eme ue mme me ne un mu me e ee = un un ue en mu en eu ue ue ns un Os Om mue ee me 


9c00 cb 
9c02 ca 
9c0S dd 
9c08 dd 
9c0b 22 
9cde 21 
9cii 22 
9c1i4 cb 
Q9cié ca 
9ci19 dd 
SEiC 00 
seit 7e 
9c20 32 
9c23 % 
9c235 ed 
9c29 ed 
Q9c2d 2a 
9c30 es 
DESL 2a 
9c34 es 
VCSSJ. ‘+1 
9c36 ed 
9c3a ed 
9c3e 2a 
9c41 dd 


47 
25 
66 
6e 


92 
+7 


73 
7b 
8c 


8a 


4b 
ob 
84 
2a 


Qc 
OZ 
02 
Se 
9 
9e 


Qc 
O1 
00 


9e 


90 9e 
8e 9e 
se 


9e 


80 9e 
82 9e 
9e 

86 9e 


bit 
jp 
ld 
ld 
ld 
1d 
ld 


bit 
JP 
ld 
ld 
ld 
ld 
ld 


ld 
ld 
ld 
push 
1d 
push 
Pop 
ld 
ld 
ld 
id 


1,a 
z,9ci4 
h,.(ix+3) 
1,(1x+2) 
(9e8c).h1 
hl,9ffe 
(9eBe) .h1 


Ô0,a 
2,:9C25 
h.(1x+1) 
1: (1% #0) 
a, (h1) 
(9e92),a 
(h1),#7 


(9e90) ,sp 
sp, (9e8e) 
h1, (9e8c) 
h1 

h1, (9e8a) 
h1 

af 

bc. (9e80) 
de, (9e82) 
h1. (9e84) 
1». (9e86) 


nbp 2 ou 3 ? 

{2, pas ad.deb 
p-forts ad.deb 
p.faibs ad.deb 
memorisee 

valeur init pile 
memorisee 
nbp i ou 3 ? 

<>1 ou 3 pas ad.fin 
p.forts ad.fin 
p.faibs ad.fin 
ancien code 
memorise 

remplace par RST& 


sauve pile basic 
pile machine 
adresse debut 
empilee pour KET 
restitution AF 
par pile 

via HL 
restitution 
autres 

registres 


90600 * 9c45 fd 2a 88 9e ld 1y. (9e88) 

30610 * 9c49 c9 ret ——--> execution 
S0630 * 

30640 * 3. retour machine sur RST6 

30641 "2 ——— 

50650 9c60 ed 43 80 9e ld (9e80) ,bc sauvegarde 

90660 * 9cé4 ed 53 82 9e ld (9e82) ,de registres 

90670 * 9cé68 22 84 9e ld (9e84) ,h1 

50680 9céb dd 22 86 9e 1d (9e86),1%x 

50690 Scéf fd 22 88 9e l1d (9e88) ,1y 

00700 * 9c73s +5 push af sauvegarde AF 

90710 * 9c74 el pop h1 par pile 

50720 * 9c75 22 Ba 9e ld (9e8a) ,h1l via HL 

90730 9c78 ei pop h1 depile ad.ret KST4 
50740 9c79  2b dec h]1 ad.fin 

30750 9c7a 2 8c 9e ld (9e8Bc) ,h1 memorisee--- ad.deb 
90/7680 * 9c/7d ed 73 8e 9e ld (9e8e) ,sp sauvegarde pile 
50770 9c81 <a 9e 92 ld a. (9e92) ancien code 

90780 ‘ 9cB4 77 ld (h1),a restitue 

J0790 * 9c85 cc a0 9c jp 9caùd saute retour basic 
90810 ” 

50820 ” 4. retour machine vers basic 

SO821 ”  ---—--—_—_—_—_— mm mm 

JO0830 * 9caÙ0 ed /7b 90 9e ld sp. (9e90) restitue pile basic 
90840 ?’ Qca4 c9 ret retour basic 

50860 ” 

50870 2. appel pour lecture ROM 

SOBB8Q 

90890 * 9cc0O df 94 90 RST3 (9094) appel lointain 9094 
90900 ? 9ccs c9 ret 

50920 * 

509350 ” 6. lecture ROM 

SOS 

90940 * 9cdO dd 66 Oi 1d h; (1x+1) p.forts ad a lire 
350950 * 9cd3 dd 6e 00 ld 1, (1»x+0) p.faibs ad a lire 
50960 * 9cdé 7e l1d a. {th1) lecture 

50970 * 9cd7 32 98 9e ld (9e98) ,a memorisee pour basic 
90980 ‘ 9cda ,c9 ret 

Commentaires 


La partie écrite en langage machine est placée en mémoire lors de 
l’'initialisation du programme (à partir de la ligne 1999). Nous avons 
indiqué en commentaire, à partir de la ligne 59994, la signification 
du code machine. 


Lors d’un lancement de programme, on appelle le programme placé 
en &9Cÿ9 avec Ÿ, 1, 2 ou 3 paramètres suivant que l'utilisateur a 
indiqué ou non une adresse de fin et de début. Dans ces cas, l’adresse 
de fin est le dernier paramètre, l’adresse de début est l’avant-dernier 
paramètre de l’instruction BASIC CALL. Le programme placé en 
&9CY9 (n° 2) mémorise l’adresse de début, si celle-ci est indiquée, 
remplace l’octet de l’éventuel point d’arrêt par l’instruction RST 6 
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(code &F7). Il effectue ensuite un ‘‘changement de contexte”’ 
BASIC vers machine (changement de pile et registres). Il lance 
ensuite le programme. 


Si un point d’arrêt a été placé, son exécution provoque l’appel du 
programme placé à l’adresse &39, où nous avons placé l’instruction 
de saut à l’adresse &9C69. Ce programme effectue un changement 
de contexte machine vers BASIC en sauvegardant aux adresses 
&9E89 à &9E8F le contenu des registres à ce moment. Il place dans 
l’octet du point d’arrêt son ancien contenu. 


S’il n’y a pas de point d’arrêt, le programme se termine par l’exécu- 
tion du programme placé en &9CA dont l’adresse a été placée au 
sommet de la pile. 


Cette manière de procéder est complexe ; mais elle est indispensable 
pour assurer la fonction ‘‘point d’arrêt’” sans perdre l’état des regis- 
tres à chaque arrêt 


Les programmes machine 5 et 6 assurent la lecture de la ROM. Le 
programme placé en &9CCY est appelé avec le paramètre ‘‘adresse à 
lire”. Il appelle le programme placé en &9CD9 par l’intermédiaire 
d’un RST3 validant les ROM. (Adresse lointaine placée en &9E94.) 
Ce programme place dans la mémoire &9E98 le résultat de la lecture. 


La partie du programme écrit en BASIC ne présente pas de difficulté 
particulière, si ce n’est les appels de programmes machine avec para- 
mètres (lignes 3159, 5199 à 5139). L’instruction MEMORY réserve 
de la mémoire placée au-dessus de &8900 à l’utilisateur. Celui-ci ne 
doit pas utiliser la mémoire placée au-dessus de &9CW9, cette zone 
étant réservée au moniteur. 


Variations 


Vous pouvez compléter ce moniteur par des programmes écrits 
uniquement en BASIC. Voici quelques fonctions que vous pouvez 
ajouter : 


— modification des registres pour un point d’arrêt. Pour cela, il 
suffit de modifier les données placées de &9E89 à &9EB8F ; 
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— dump de la mémoire sous forme de caractères. Il faut indiquer le 
contenu de la mémoire par CHRS$(). Cette fonction permet d’inter- 
préter plus facilement le contenu de la mémoire, en particulier là où 
est stocké le programme BASIC ; 


— sortie sur imprimante du dump; 


— sauvegarde sur cassette ou disquette de vos programmes 
machine, et chargement ; 


— éventuellement, si vous êtes ambitieux, un désassembleur qui 
vous permettra de lire le contenu de la mémoire directement en lan- 
gage assembleur ; 


— etc.! 
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Chapitre VIII 


Quelques 
programmes 





Les programmes qui suivent, ainsi que ceux proposés à la fin des 
chapitres précédents, sont destinés à illustrer les possibilités offertes 
par l’ Amstrad. Un utilisateur non rompu au langage BASIC pourra 
s’en servir sans y apporter de modification. Ces programmes, tous 
inédits, constitueront une partie de sa ‘‘logithèque”’. 


Mais les mêmes programmes peuvent servir de point de départ à des 
logiciels plus étoffés. Quelques notes, regroupées sous les paragra- 
phes “‘variations’”’, permettront aux passionnés d’étendre ou de 
modifier les fonctions proposées. 


Nous avons essayé de structurer nos programmes pour faciliter leur 
lecture et leur portabilité éventuelle sur d’autres ordinateurs ou sur 
d’autres langages de programmation. Les commentaires et les inden- 
tations poursuivent les mêmes buts, au détriment parfois de la rapi- 
dité d’exécution (du fait de l’interpréteur BASIC). Les personnes 
soucieuses de performances pourront les éliminer provisoirement. 
Pour notre part, c’est aussi par souci de performance que nous 
avons placé les sous-programmes les plus fréquemment appelés en 
tête et les sous-programmes d’initialisation en fin de programme. 
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Macao 








Pour éviter les crises cardiaques, nous avons limité la durée de ce jeu 
à cinq minutes au maximum. Il s’agit pour le joueur de faire tourner 
trois roues pour obtenir une des trois combinaisons gagnantes. S'il 
n’y réussit pas du premier coup, il peut rejouer une, deux ou les trois 
roues à la fois. Trois figures identiques valent cent points. Le lot de 
consolation vaut dix points pour deux figures identiques. 


l è LLRARLNSIDERRRNTSANALLRINA 

2 À ' MACAO | 

. : SRLSLLLLLLELLSSLILSILEILLELIL 

10 GOSUKH 1000 * initialisation 

20: ? 

530 WHILE jamais = © * boucle sams fin 

40 GOSUR 100 

50 WEND 

60 ” 

45 

DO 
71: jeu 

92, ——— 

100 FOR i=1 TO 3: ok{(i)=1: NEXT * les 3 positions a rejouer 
110 ” 

120 CLS #5: FRINT #3.'Une touche SVP" 

125 CALL vide : WHILE INKEYS = "" : WEND 

130 GOSUR 2000 * 1er tour de roue 

Lo 


140 CLS #3 : FRINT #3 
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141 
142 
145 
147 
150 
192 
19 
155 
197 
160 
162 
165 
170 
180 
190 
200 
210 
220 
2350 
240 
250 
280 
270 
280 
490 
491 
492 
900 
510 
52 
530 
940 
590 
960 
570 
580 
590 
600 
610 
620 
850 
640 
890 
691 
692 
700 
710 
720 
730 
740 
750 
760 
770 
780 
990 
991 
992 
1000 
1005 
1010 
1020 
1030 
1040 
1050 
1060Q 


PRINT #3,'"Quelle(s) position(s) rejouez-vous? " 


CALL vide s:num$ = "" : »3$ = "" * vide les entrees precedentes 
WHILE »x$<2> CHRS(13) * simule un INPUT 
IF x$2>="1" AND x$<="5" THEN num$=numS+»:$ : PRINT #3,x83" ": 
x $S=INKEYS 
WEND 
FOR i=i TO 3: ok(i)= O: NEXT ° pas de roues a faire tourner 
FOR i=i TO LEN(num$) 


FOR j=i TO 5 


IF VAL(MID$(num$,1i,.1))=)j THEN ok(j)=1 * a rejouer ? 
NEXT j 
NEXT :i 
IF ok(1)+0k(2)+0k(3) «> O THEN GOSUK 2000 ® 2eme tour 
GOSUE 700 * resultat 


RETURN 


OO ue ne um mue tue mue me mg ue © A de MU Œue me MUR ee me œ @ue US GUN Me A due me ne mu mue nu ee ut Gt Ge Ge Œ ue de me ue mue Qi mu Ge ce mue ms Ge ue ou Ou Œ de Ge ee ie Om ce mn 


PRINT #1.STRINGS(8," ") :; 


FOR 1 = 1 TO 3 
c=c(1) 
IF © = 224 THEN coul = 3 * sourire 
IF cc = 227 OR c = 228 THEN coul = 2 coeur où carreau 
IF cc = 226 OK € = 229 THEN coul = Q * pique ou trefle 


PEN #1,coul 
FRINT #1,CHRK$(c):" "3: 


NEXT 
PRINT #1 
RETURN 
resultat 
plus = 0 
IF c(t)=c(2) OK c(i)=c(3) OK ci2)=c(3) THEN plus = 10 
IF cil)z=zc(2) AND c(i)=c(s) THEN plus = 1O0 


score = score + plus 
FEN #4,2 : FRINT #4,score 
RETURN 


ee ee A te te te me me ne ee dues ue ne de Me ce me me mme mg eût ie de due de ne me mn + + ue me me Ode ue me mn me = me me ee + + nn ne mn me 


INK O,0O : INK 1,1 * Osnoir 1:bleu 

INK 2,6 : INK 6,26,6 * 2#srouge vif 6:blanc/rouge 
INK 5,24,11 :INK 4,9 : INK 5,12 ‘ 3S:jaune/bleu 4:vert S:Jaune 
RORDER 5 

PEN 3 

MODE © 
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1070 WINDOW #6,10,17,2,2 * score : 


1080 WINDOW #1,7,13,7,10 roues 

1090 WINDOW #2,7,13,12,12 * numero des roues 
1100 WINDOW #3,2,19,20,25 ” commandes 

1110 WINDOW #4,17,25,2,3 * total 

1120 WINDOW #5,1,8,2,2 ? temps qui reste 
1125 ? 


1130 PAPER Q :FAPER #1,4 :PAPER #3,4 

1135 CLS:3CLS #1:CLS #23CLS HS: CLS #4: CLS #5: CLS #6 
1140 FEN #6,2 : PRINT #6, "Score: 

1150 PRINT #2," 1 2 3" 


1155 FOR i=1 TO 3 : ci) = 224 : NEXT : GOSUR 500 * sourire 

1160 ‘ 

1170 INPUT #3%,'"Duree du jeu 1 a S minutes ":minute 

1180 IF minute<i OR minute>5 THEN GOTO 1170 

1190 ” 

1200 sec = minute # 60 

1210 EVERY 50,3 (GOSUR 4000 * bats la seconde 

1220 AFTER sec#50 ,0 GOSUB S000 fin 

1230 * 

1240 vide = &BBO3 ? adresse pour 

1250 ?” reinitialiser le clavier 
1260 RETURN 

1990 
1991 les roues tournent 

12992 

2000 ? ms 

2020 ” 

20350 rep = 10 7 10 tours 

2040 EVERY 18,1 GOSUB 3000 * hasard 

2050 WHILE rep > O0: SOUND 3,500-20t%rep: WEND * attente en musique 


2060 xx=REMAIN(1) 

2070 RETURN 

2080 

2090 * 

2990 *----————— 
2991 hasard 

2992"  —----—- 

3000 RANDOMIZE TIME 

3010 FOR i=1 TO 3 

3020 IF oki) = 1 THEN ci) = 226 + INT(RND({3)#%4) 
3030 ci) = MIN ( ci) , 229 ) 

3040 NEXT i 

SO0S0 ? 

3060 SOUND 4,0,10,15,9,91 ? cliquetis 

3070 ? 

3080 GOSUB 500 * affichage 

3090 ” 

3100 rep = rep - i ” un tour de roue en moins 
3110 * 

3120 RETURN 

3130 

3140 : 

8990 
3991 * temps qui reste 

3992 * a —— 

4000 m = sec \ 60 

4010 s« = sec MOD 60 

4020 PEN #5,4 : IF sec <10 THEN FEN #5,6 

4030 PRINT #5 : FRINT #5,m3s 

4040 sec = sec — 1 

4050 IF sec < © THEN xx = REMAIN(3) 

4060 RETURN 

4070 * 

4080 
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3991 ” fin 
4992 
3000 CLS #35 : FRINT #3.'Merci de votre visite" 
5010 PRINT #5,'"A bientot" 

9020 CLEAR 

3050 WHILE INKEYS$ = ‘" : WEND 

2040 END 


Commentaires 


L'affichage du temps qui reste à jouer est géré par interruption 
(lignes 1219 et 4909 à 4969). La fin du jeu arrive à n’importe quelle 
phase du jeu au bout du temps imparti (lignes 1229 et 5999 à 5949). 


Le comportement aléatoire des roues est assuré par les lignes 3999 et 
3929. Les valeurs affichées dépendent uniquement du moment où le 
joueur appuie sur une touche, ce qui est impossible à prévoir au tiers 
de seconde près (TIME varie toutes les 399 millisecondes). 


Variations 


Il est possible d'augmenter le nombre de roues (r) ou le nombre 
de figures (f}). Il y a alors f' combinaisons possibles. Ainsi pour 
trois roues et quatre figures, il y a 64 (4°) tirages possibles; pour 
quatre roues et six figures il y en a 1 296. 


Le nombre de tours de roues est fixé à la ligne 2939. Vous pouvez 
l’augmenter ou le diminuer à volonté. Il n’en est pas de même pour 
le temps entre deux affichages de roues. En effet, si, à la ligne 249, 
vous remplacez la valeur 18 par la valeur 15, les roues ne s’arrêteront 
pas de tourner. Cela provient du fait que le temps d’exécution du 
sous-programme d'interruption (3994-3129) est supérieur à 399 mil- 
lisecondes (15 X 29). Les demandes d’interruption s’‘‘entassent”” 
donc et le BASIC ne pourra jamais exécuter la ligne 2969 qui arrête 
l’appel du sous-programme d'interruption qui fait tourner les roues. 
Ceci confirme la règle qui veut qu’un sous-programme d’interrup- 
tion périodique dure moins longtemps que l’intervalle de temps entre 
deux activations de ce sous-programme. 
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Annuaire 





Est-il plus pratique d’avoir son annuaire personnel sur un carnet ou 
sur support magnétique ? La réponse dépend de la taille et de l’utili- 
sation de cet annuaire. Pour vous laisser le choix, nous vous propo- 
sons un petit gestionnaire de fichier. Les fonctionnalités principales 
sont présentes : lecture, ajout et retrait d’un nom, lecture et écriture 
sur bande magnétique. 


HORS 


10 GOSUK 3CG00 


20 


TO WHILE »x$ <> 
GOSUB 


ot) 
60 
70 
80 
90 
100 
110 
120 
130 


140 


® 


x$ = 


êo2 allee du parc 


: Liste des nons 


L 
À : Ajouter un non 
k Lire fichier sur cassette 


Ha Votre choix SW ? 





E : Enlever un non 


$ : Sauvegarder fichier sur cassette 


LARENALLRNELLESELANX 
XANNUAIRE x 
KANASLALRRRSLSALLAX 


x 


3300 


UPPERS (x $ ) 


IF x$="L" THEN 
IF »x$="A" THEN 
IF x$="E" THEN 
IF »:$="k" THEN 
IF x$="S" THEN 


WEND 


CLS : 


LE 
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END 


GOSUB 
GOSUKR 
GOSUR 
GOSUR 
GOSUB 


initilisation 


choix 


1000 
1200 
1400 
1600 
1800 


lire 

ajouter un nom 

effacer un nom 

lire fichier sur cassette 
sauvegarder fichier sur cassette 


1020 
1025 
1930 
1040 
1050 
10860 
1070 
1980 
1085 
1090 
1095 
1100 
1105 
1110 
1115 
1117 
1120 
1150 
1140 
1190 
1191 
1192 
1200 
1210 
1220 
1230 
1240 
1250 
12860 
1270 
1280 
135390 
1391 
1392 
1400 
1405 
1410 
1420 
14350 
1440 
1450 
1460 
1470 
1480 
1490 
1590 
1591 

1592 
1600 
1610 
1620 
1630 
1640 
1850 
1660 
1670 
1680 
1690 
1790 
1791 


ee ne ee ee ce me ce tee te me me me te me mme me ne de me ue ue et ce ee die dut une me mue une dt de mn me me me me ee me ee ue en ee ee ue ee eue ee ee en ut ce de me ee me eue un me 


» 


CLS : LOCATE #1.1,1 :LOCATE #2,1.1 :LOCATE #3,1,i 


FOR i = O TO n 


mx = À * nombre maximum de lignes pour ce nom 
FRINT #1,n$(1i) ° nom 

1 = LEN(n$(i)) :hn=1+INT(1/1n) : mx =MAX (mx: .hn) 
PRINT #2,a$%(1) * addresse ’ 

1 = LEN(a$(i)) 2ha=1+INT(1/1a) : mx: =MAX (m: .ha) 
PRINT #3,t#$%(1) ? telephone 


1 = LEN(t$#(i)) sht=1+INT(1/1t) : mx =MAX (mx: .ht) 


FOR j=hn TO mx-1i :PRINT#1 :NEXT 
PRINT#1I1,STRINGS(In-1.,"—-") 
FOR j=ha TO mx-1 :PRINT#2 :NEXT 
PRINT#2,STRINGS(l1a-1,"—") 
FOR j=ht TO mx-1 :PRINT#3S :NEXT 
PRINT#S,STRINGS$(I1t-1,"—") 


NEXT 
RE TURN 


me te ce te te fe ee te ee nt M Ce Ce CS Ce Ce CE CS EE A de mue dite te ce ee me ue Me eu “ue ne ne ne ue ue me AU Me ie mue nt M de és de Re Me me ne ge me ee ee ne 


INPUT #4,"nom "3n$ 


INPUT #4, "adresse "sas 

INPUT #4.,'"telephone "sts 

n = nn + 1 ” un nom supplementaire 
n$(n)=n$ : a$(n)=a$ : t$in)=t$ ? memorisation 

GOSUEH 2200 RS 


RETURN 


dm um 0 ue em ue me eue mn mu mue ces mg ue eue mu mue mu mn qu mu en eme us eue ee ce me nt me me de nee ee une ue une se de mo de mn + ne mn me me de de me me ee me me me ee ee ee me 


INFUT #4,'"nom a effacer "s3ns$ 


m æ —1 
FOR 3 = © TO n 
IF n$ = n$(1) THEN m = 1 : GOTO 1440 *” nom trouve 
NEXT 3 
IF m = -1 THEN FRINT #4,'"nom inconnu“ : GOTO 14960 
n$(m) ='"zz2zzz22z" * nom trouve remplace par 222227 
GOSUR 2200 D à à 
n = n — 1! ° un nom en moins 


en de cétée tee mue de mt de de Ces ut de motte mme mue mme tte de dt dut éme m0 du eu nue mue ue mme mnde <R de ue  Œuue Mu An ue un eu de ue ue mt de nt D 0 Ge + Æ Œ ne en 0 ie ee ne 0 Oo ee me ne - 


OPENIN "!'"+#$ 
INPUT #9.n *” nombre de personnes + li 
FOR 1 = O TO n 
INPUT #9,n$(i) : INPUT #9,a$(1) : INPUT #9,t$%(1) 
NEXT à 
CLOSEIN 
RETURN 


Su me mue m0 me mn me me me mé Nu eut une me me me me mue une ue mue ue Gt née mue ce me me me ee ee ee ee ee ee me ee ne ee me ee + + ue me mn ue ue eu ue Œu ee ee ee ee me ne 


Sauvegarder le fichier sur cassette 


151 


1172 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
2170 
21971 
217% 
2200 


2230 


2240 


2250 


2992 
3000 
3010 
3020 
5025 
3OZFO 
530%2 
3OZS 
3040 
3045 
3050 
3060 
5070 
3080 
3090 
3100 
3110 
3120 
3490 
T491 

2492 
3900 
Z510 
3515 
3520 
Je 
3330 
3540 
vVvEC 


3590 


FER 
NN JD. 


2560 
3570 


3580 
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OPENOUT "!'"+$f$ 
PRINT #9,n * nombre de personnes + 1 
FOR ii = O TO n 

PRINT #9,n$(1) :PRINT #9,a$(i) :PRINT #9,t#(1) 
NEXT à: 
CLOSEOUT 
RETURN 


= me ue ue me ce ue mu me uote me mu me mme + ne ie de Ne de ue ue eu eu + eue mu nue nue Que me mue mue mue ue mue mnt me de MR Gun ue me un une cs mu ue ee cu mu me me mue mn ee ne + de me mn mu 


FOR i = © TO n-1 
FOK ] = 1 TO n-1 


IF n$(J) > n$(j-1) GOTO 2280 
n$=n$()1): n$()1)=n$(j-1): n$(j-1)=n$ ‘ inversion du nom 
a$=a$(j)): a$(j])=a$(j-1): a$(j]-1)=a$ " inversion de l'adresse 
tS=t$()1): t$S(1)=t8(j-1): t$(j-1)=t$8 ‘ inversion du telephone 
NEXT ) 
NEXT ji 
RETURN 


mu us eus ms ous mue mms um mm mu we dune wie din me mit um mu mu me au dm Aie mue mue mie 0 eu ue mu due me mue mu ut ut ut ne œuun ue œ ment die mn de Gt ue mue mu me œues euue me MR me CN CN Ode et ue me me me 


» 


initialisation 


ee ee ee me té de de 


INK O,13 : INK 1,0 * noir sur blanc 


PAPER O : PEN 1 : BORDER © 
MODE 2 
DIM n$(500),a$ (3500) * 901 noms et addresses 
DIM t#(500) ” 501 telephones 
1n=20 : l1a=41 : I1t=14 * largeur 
WINDOW #1.,2,1n+1.1,20 ‘ nom 
WINDOW #2,1n+35,l1ln+la+2,1,20 ° adresse 
WINDOW #5.ln+la+4,ln+lat+tlit+35,1,20 * telephone 
WINDOW #4,3,80,21,25 * commandes 
n = —i * aucun nom 
RETURN 
choix 
PRINT #4," L : Liste des noms” 
PRINT #4." À : Ajouter un nom: 
PRINT #4," E : Enlever un nom” 
PRINT #4," KkK 3: Lire fichier sur cassette’: 
FRINT #4," S : Sauvegarder fichier sur cassette” 


PRINT #4," X 2: Fin "7 
PRINT #4," #%K£%4 Votre choix SVF 7 " 


CALL SRHOZ 
X$=INKEYS :1F x$="" GOTO 2560 


RETURN 


Variations 


Le tri proposé, dit tri bulle, est très simple (lignes 2299 à 2390). Vous 
pouvez le remplacer par un autre, plus rapide, si vos fichiers dépas- 
sent une cinquantaine de personnes. 


L'affichage de l’annuaire (lignes 1999 à 1149) ne tient pas compte de 
la hauteur de l’écran. Il est toutefois possible d’utiliser le ‘‘break”’ 
pour arrêter le défilement et une touche quelconque pour le repren- 
dre. Une gestion plus poussée du ‘‘break’’ (ON BREAK GOSUB) 
conduira à une plus grande souplesse. Il peut également être intéres- 
sant d’afficher uniquement le fichier page par page, c’est-à-dire 
écran après écran. Une impression sur papier (hard copy) ne deman- 
dera pas d’effort particulier en utilisant le canal # 8 qui est le canal 
imprimante. 


Le menu de cet annuaire peut s’enrichir d’une fonction de recherche 
d’un nom ou d’une partie d’une adresse ou d’un numéro de télé- 
phone. La mise à jour d’une adresse ou d’un téléphone peut se faire 
partiellement, sans avoir à réécrire toutes les coordonnées de la 
personne. 


Enfin, si vous voulez que votre fichier reste confidentiel, vous pou- 
vez le coder et le décoder en ajoutant et retranchant une valeur quel- 
conque à chaque caractère ASCII du fichier. Les commandes de 
codage et de décodage se feront par des touches que vous n’affiche- 
rez pas, bien entendu, sur le menu. 


Hanoi 


Voici un programme qui intéressera sans aucun doute les amateurs 
de casse-tête. Celui-ci, inventé au siècle dernier par le mathématicien 
Georges Lucas, est connu sous le nom de Tour de Hanoi. 


Cette tour est une pile d’assiettes qu’il faut déplacer d’un plateau 
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vers un autre. Il y a bien sûr des règles du jeu que nous exposons au 
long de l’exemple suivant : 





Trois plateaux, À, B et C, sont posés sur une table. Sur le plateau A 
sont empilées six assiettes de tailles différentes, la plus petite en haut, 
la plus grande en bas. Il s’agit de déplacer ces assiettes vers le plateau 
C en sachant que : 


— on ne peut porter qu’une assiette à la fois, 


— une assiette ne peut être posée que sur un plateau vide ou sur une 
assiette plus grande qu’elle-même. 


Nous ne vous donnerons pas la solution car le programme présenté 
ici le fera bien plus facilement que nous, et pour un nombre d’assiet- 
tes à déplacer plus important si vous le désirez. 


Utilisation du programme 


Après avoir indiqué le nombre d’assiettes, l’origine et la destination 
de ces assiettes, il ne vous reste plus qu’à appuyer sur une touche du 
clavier pour que la solution apparaisse. Chaque touche appuyée fait 
déplacer une assiette jusqu’à la solution finale du casse-tête. 
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À 
10 
15 
20 


25 


26 
350 


rez 
mr) 


40 
50 
60 
65 
70 


72 
+ 


75 

80 

85 

90 

95 

100 
110 
120 
130 
190 
191 
200 
210 
220 
2%0 
240 
290 
300 
301 
302 
303 
z04 
305 
306 
310 
420 
430 
440 
450 
460 
470 
480 
481 
482 
490 
491 
500 
505 
506 
510 
S12 
S20 


330 


SARAH ARSADRA NI DI4S AD ÀS3 
 } LU OU K D E FA 44 IN ÙÜ 1 4 
RENE RERENRRNNSSNISÉ ERNEST 


CLS : CLEAK : GOSUEH 1000  anitialisation gr aplii que 


INFÜT #1. "Nombre d’assiettes a deplacer (1 a 15)"; nn 
IF n° < 1 OK n°; 15 THEN GOTO 20 ELSE n0 = n 


INFUT #1,"De (a.b ou oc) "sx$ : »x$ = LOWERS(x$) 
IF x#$<:"a" AND »x$8<:"b" AND »#$%<:"c" THEN GOTO 30 


INFUT #1.'"Vers “326 : z2$% = LOWERS(z#$) 
IF (z$<:"a" AND z$<:"b" AND z$%::>"c") OK z$ = »x$ GOTO 50 
y=ASC(»x9$) +ASC(z$) -2kASC{" a") 2: y = 3-y * calcul de y 
y$ = CHR$S(y+ASC('"'a")) * calcul de y$ 
GOSUEH 1100 * dessin initial 
GOSUE 200 * solution 
b$ = INKEYS$ : IF b$ = "" THEN GOTO 100 ELSE GOTO 10 
solution pour n assiettes de »:$ vers z$ par y$ 
IF n = ©Q0 GOTO 470 
h'= nn = 1 
t$ = 212$ : 12% = yS$S : y$ = t$ 7 y$S <——: z$ 
GOSUB 200 * appel recursif 
t$ = y$ : y$ = 26 1: z$ = t$  y$ <——-: z$ 
FEN #1,15 : PRINT #1,'"assiette ‘:; ? origine 
FEN #1,8 : PRINT #1,UPFERS(x$) ; 
PEN #1,.15 : PRINT #1," vers "1: * destination 
FEN #1,8 : PRINT #1,UPPERS(Zz$); 
PEN #1,15 
GOSUK 500 * visualisation 
* graphique 
t$ = »x$ : x$ = y$ : y$ = ts 7 NS <——-2> y$ 
GOSUR 200 " appel recursif 
LS = y$ : y$ = »:$ : x$S = ts HE SE YS 
n = n + 1 
RETURN 
deplacement graphique de »:$% vers 2% 
PRINT #1.,'"Une touche SVF" 
attente$ = INKHEYS$ : IF attentes = "" THEN GOTO 505 
de = ASC(x$) —- ASC('"'a") *” ar:0 bsi c:2 
vers = ASC(:$) —- ASC('"'a") "250 bDil E:2 
ptride) = ptride) — 1 * depilage 
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540 
545 
990 
560 
570 
580 
590 
600 
610 
620 
630 
640 
6850 
660 
6870 
680 
990 
991 
1000 
1005 
1010 
1015 
1020 
1030 
1035 
1040 
1050 
1060 
1065 
1070 
1080 
1090 
1091 
1092 
1095 
1096 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 


Co 


ass = pile(ptr(de),.de) 
ssSa = nO — ass + li 


MOVE 107+213kde-assilarg.hO0+{ptr (de)+1)k%dis ‘ efface ancienne 


DRAWR 2rassilarg.0,0 * position 
pile(ptrivers),vers) = ass * empilage 
ptr vers) = ptrivers) + 1 
MOVE 107+21Sivers-assilarg,hO+ptr (vers)tdis ‘ nouvelle position 
DRAWR 2%assflarg,0,ass * visible 
RETURN 
* ainitialisation graphique »:$ : tas initial 
? mem ———— n : nombre d'assiettes 
MODE © 
INK 0,0 : PAPER O : BORDER © *’ papier et bord noir 
WINDOW #1,1,20,23,25 
FOR i=1 TO 15 ” chaque encre à sa couleur 
INK 1,i+7 
FEN #1,1 :PFRINT #1," HAN O 1" 
NEXT 
DIM pile(14,2) * 3 piles de 15 assiettes 
DIM ptr (2) * 3 pointeurs 
RETURN 
dessin initial 
distance entre assiettes 
IF nO<2 THEN dis = 339 ELSE dis = 339/(n0-1) 
larg = 107/n0 * largeur assiette 
hO = 60 - dis * hauteur minimum 
tas = ASC(»:$)-ASC("a") * a:O0 b:1 c:2 
FOR i = 1 TO no 
1e Nn0.Ss 1 +71 
pileltptritas),tas) = j ? initialisation pile 
ptritas) = ptritas) + 1 
MOVE 107+213ttas-jtlarg,hO+iidis 
DRAWR 2%j4larg,0,j ?” dessin assiette 
NEXT 1 
RETURN 
mmentaires 


Le mode ÿ (ligne 1990) est celui qui autorise le maximum de couleurs 
présentes en même temps sur l’écran. L’encrier 9 contient la couleur 
noire (ligne 1995) et chacun des quinze autres encriers est rempli 
d’une encre de couleur différente (lignes 1929 à 1949). 


Le fond de l’écran étant noir, l’effacement d’une assiette est réalisé 
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en la coloriant en noir (ligne 579). La variable ass (ligne 639) déter- 
mine la couleur de l'assiette. 

L’état des trois plateaux est représenté par des piles au sens classique 
en informatique de mémoire où le dernier élément introduit est le 
premier élément ressorti. 


La solution du casse-tête réside dans l’appel du sous-programme 
299-479. Cette solution découle de la remarque suivante : 


Déplacer n assiettes du plateau X vers le plateau Z (lignes 209 à 470) 
équivaut à : 
1. déplacer (n — 1) assiettes du plateau X vers le plateau Y 
(lignes 219 à 249), 
2. porter 1 assiette du plateau X vers le plateau Z 
(lignes 399 à 305), 
3. déplacer (n — 1) assiettes du plateau Y vers le plateau Z 
(lignes 429 à 459). 
X Y Z 





atteindre 


= — = = = == = = = = cu = = ee = = = + == = «+ == + = = + = == + = = = = = = = = = = = + ee — = = = + = == + — = …— 


_— mm mm mm mm mm mm ee ee me — 


— = = = = — = ne = ee = = ee = = ne = = = = = + + = + = = ee = — nm = ee ee = = 2 = ee = = + —— = = + = = == <= = + = 


Solution du problème en trois étapes. 


La deuxième étape est autorisée par la règle du jeu alors que les deux 
autres ne le sont pas. L’étape 1 est résolue en appelant le sous- 
programme 299-474 avec une assiette en moins et en inversant Y et Z 
(X vers Y et non X vers Z). L’étape 3 a une solution comparable. 


Le sous-programme 299, s’appelant lui-même (lignes 239 et 439), est 
un sous-programme récursif. Il faut donc veiller à ce que les varia- 
bles retrouvent leur état initial après les appels récursifs (lignes 249 et 
449). La variable n n’est pas incrémentée à la ligne 25 car elle serait 
immédiatement décrémentée à la ligne 416. 
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Narcisse 





Il avait une passion folle pour son image. Il se précipita dans les eaux 
de la fontaine qui lui servait de miroir et donna son nom à une fleur. 

















Ï 


CLETD TILL LI LIT 
pit 


4] 


Le 
3 
LA 

= 
= 
LS 
- 
LI 
- 
3 
= 
3 
- 
- 
= 





Dans un premier temps, vous définissez les axes et les points de 
symétrie. Les quatre flèches déplacent un point clignotant. La tou- 
che [ . ] fige un point de symétrie. La touche [copy] valide les axes de 
symétrie. Il peut y avoir jusqu’à quinze points et quinze axes de 
symétrie. La touche [enter] vous conduit au mode dessin. Les quatre 
flèches déplacent le curseur. La barre d’espace change alternative- 
ment le curseur en gomme ou en crayon. 


1 LALANLELARATENRSESIX 

2 &NARCISSEX: 

< LANCER LLLLRAANLEEERAX 

Lo 

20 GOSUR 500 * initialisation 

50 ” 

355 PRINT #1.CHR$(240):" ":CHR$S(241):" “":CHRS$S (242) * mode 
36 PRINT #1,:CHR$ (243%) 3;" "s;"copy"3;" ":"."3;3" "s'enter" ? d'emploi 
LŸ AR 

40 a$ = INKEYS : IF a$ = "" GOTO 40 ELSE aa = ASC(a$) 

45 © 

50 WHILE jamais = 0 * boucle infinie 


680 ON mde+1 GOSUR 1000, 2000 
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80 a$ = INKEYS : IF a$ = "'"" GOTO 80 ELSE aa = ASC(as#$) 
90 WEND 
100 
1109” 
120 
490 initialisation 
491 * ---——-——_—_—_———— 
500 MODE © 
510 larg = 600 : haut = 365 
920 dfi = 10 : dfO = 3 precision des traces 
930 DIM a(15),b(15),c(15) 15 droites 
540 DIM pO(15) ,p1(15) 15 points de symetrie 
545 
5950 FOR i = 1 TO 15 
560 INK 1,i+2 chaque symetrie 
970 NEXT 1 a sa couleur 
nr 
980 INK 0,13 : INK 11.26 O:gri18 1:blanc 
590 BORDER © : PAPER © : PEN 1 bords noir fond blanc 
600 * 
610 WINDOW #1,20.20,3,25 
614 WINDOW #2,1,20,1.1 
615 PRINT #2," NARCISSE";: 
620 * 
6350 RETURN 
640 ? 
DR 
990 mode definition des symetries 
BR 
1000 
1010 
1020 : 
1030 IF aa=240 THEN y={(y+d#1) MOD haut : GOTO 1100 HAUT 
1040 IF aa=241 THEN y=(y-df1) MOD haut : GOTO 1100 ‘HAS 
1050 IF aa=242 THEN »:=(x-df1) MOD larg : GOTO 1100 ‘ GPUCHE 
1060 IF aa=24Z THEN x=(x+df1) MOD larg : GOTO 1100 DROITE 
1070 * 
1080 GOTODO 1200 ” suite des tests 
1090 
1100 IF x<O THEN »x= x+lardg 
1110 IF y<O THEN y= y+haut 
1160 FLOT ax,ay,O : ax=»x : ay=y efface ancien point 
1165 FLOT x,y.4 marque nouveau point 
1170 GOTO 1700 * return 
1180 ” 
1200 IF aa <> 224 GOTO 1400 * C0OFY ( axe ) 
1205 IF nsd <= 14 THEN ax=0: aÿzx0O * ne pas effacer ancien point 
1210 IF premier=0 . 
THEN xO=x:yO=y: premier=i: GOTO 1700 ‘ ier point de droite 
1220 XÂ=x : yi=y * 2eme point de droite 
1230 nsd = nsd + 1 
1235 IF nsd > 15 GOTO 1700 ” numero de sym/droite 
1240 MOVE x0, yO * dessin droite 
1250 DRAW »x1,y1i,nsd 
1260 * 
1270 GOSUKR 3000? * calcul a.b.c dans ax+by+c = 0 
1280 
1290 atnsd)=a : binsd)=b : cinsd)=c 
1300 
1310 premier = © 
1320 GOTO 1700 return 
1330: 7 
1400 IF a$ «<> ",.'" GOTO 1500 F O I NT (symetrie/point) 
1410 nsp = nsp + li 
1415 IF nsp 15 GOTO 1700 numero de symetrie/point 
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1420 

1425 ax = Ô : ay = © * ne pas effacer ancien point 
1430 poO(nsp) = > * abscisse point de symetrie 
1440 pitnsp) = y ordonnee point de symetrie 


1450 PLOT x,y,nsp 


1460 ” 

1470 ” 

1500 IF aa «> 13 GOTO 1700 ENTER ( --5 mode dessin ) 
1510 mde = ji —- mde * changement de mode 

1520 premier = © * premier point d’une droite 
1522 xX20 2 y=O * coordonnees 

1525 CLS 

1530 PRINT#1,CHR$(240)3" ":;CHR$S(241):" "s CHR$ (242): * mode 
1532 PRINT#1," ";CHR$(245);" "s"blanc";" “; "enter" * d'emploi 
1535 PRINT #2." DESSIN": 

1540 GOTO 1700 

1550 * 

1560 * 

1700 RETURN 

1710 ” 

1720 

1989 
1990 mode dessin 

2991 7 

2000 

2030 IF aa = 240 THEN y = (y+dfO) : GOTO 2100 HAUT 

2040 IF aa = 241 THEN y = (y-dfO) : GOTO 2100 "HAS 

2080 IF aa = 242 THEN x = (»-d#0) : GOTO 2100 ? GAUCHE 
2060 IF aa = 243 THEN x = (x+dfO) : GOTO 2100 * DROITE 
2080 GOTO 2400 * suite des tests 

2090 

2100 

2120 * 

2130 IF inveQ THEN FLOT ax,ay,0 * efface ancien point 

2155 ” si mode invisible 

2140 AY = X : ay = y * ancien point 

2160 PLOT »,y,4 *” nouveau point dessine 
2170 ” 

2180 FOR i = 1 TO nsd * symetries/droites 

2190 a=a(i) : b=b(i) : € =ci{i) * ax+by+c = O 

2200 X1 æ (-2%at(c+biy)+(b"2-a"2)4x) / (a”2+b"2) * abscisse image 
2210 yi = (—-2ibi(c+atx)+(a"2-b"2)4y) / (a*2+b”"2) * ordonnee image 
2220 PLOT »x1,y1,it%inv * point invisible au depart 
2230 NEXT i | 
2240 * 

2250 FOR i = 1 TO nsp  symetries/points 

2260 xi = 24pO(i) - »x ” abscisse image 

2270 yi = 2%piti) —- y * ordonnee image 

2275 Xi = x1 MOD larg :  y1i = yi MOD haut 

2280 PLOT x1,yi.ikinv * dessin du point symetrique 
2290 NEXT i 

2500 ? 

2350 * 

2400 IF a$ = “ " 


THEN invæi-jinv : GOTO 2700 * ESPACE (visible/invisible) 
2420 ” 


2470 

2500 IF aa <> 13 GOTO 2700 "ENTER ( --; mode definition ) 
2510 mde = 1 - mde * changement de mode 

2520 CLG 

2540 PRINT#1,CHR$(240);" ":;CHR$S(241):" ": CHR$ (242) ; 

2542 PRINT#I,CHRS(243)3" "“s"copy"3" “s3"."s" “s'enter" 

2545 PRINT #2,"SYMETRIE S": 

2550 * 
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2700 RETURN 

2885 ‘ 

2886 ” 

2887 

2990 * calcul des coefficients a,b.c (ax+by+c=0) a partir de deux points 
POIL ” de mensn see esne ee mesnen er 

3000 IF yO = yi THEN a=0 :b=1 :c=-yO :GOTO 3060 ‘ axe horizontal 

3010 ” 


3020 a = 
30730 b = (xi-xO0) /(yO-y1) 
3040 c = —-»x0— bky© 


3050 ? 
3060 RETURN 
4000 a$=INKEYS:IF a$=""GOTO 4000 ELSE PRINT a$.ASC(a$):GOTO 4000 


Commentaires 


Les tableaux a(15), b(15) et c(15) définissent les quinze droites de 
symétrie, d’équation ax + by + c = %. Les tableaux p@(15) et 
pi(15) contiennent les coordonnées des points de symétrie. Le calcul 
des points image est fait aux lignes 2299-2219 et 2269-2274. La varia- 
ble inv vaut 1 pour la position crayon et Ÿ pour la position gomme. 


Variations 


Si vous possédez un Joystick, vous penserez sûrement à modifier les 
lignes 1939 à 1969 et 2039 à 2060. 


Les artistes soucieux de conserver leur création pourront garder la 
mémoire écran sur cassette ou sur disquette. 


La définition du dessin peut être améliorée au maximum, au détri- 
ment du temps de calcul des symétries, en affectant la valeur 1 à la 
constante dff (ligne 129). Si la couleur vous indiffère, le mode 2 
vous donnera la plus grande précision possible pour le tracé des 
dessins. 
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Annexes 


Annexe | 
Liste des instructions du Z84 
classées par ordre alphabétique 


Les octets marqués par . . sont à compléter par l’opérande de 
l'instruction, c’est-à-dire la valeur N ou NN, l’adresse (NN) ou le 
déplacement d. 


Exemple : 

AND (IX + &ÿ5). Se reporter à l’instruction 
AND (IX + d) de code DD A6... 
Remplacer . . par ÿ5 

L’instruction est DD A6 ÿ5 
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Code Instruction Code Instruction Code Instruction 











8€ ADC A (HL) F DO9 ADD 1Y BC CB40 BIT1L 
DU8Fes  ADC A {IX + u} FD19 ADD IY Df C856 BIT 2{1) 
FOBE»s  ADC A. IIY + d) FD29 ADD I1Y_.1Y DOCB.:56 BIT 2. (IX +d) 
8F ADC A A FU39 ADD !1Y SP FDCB,.56 BIT 2 ({I1Y + d) 
88 ADC A 8 A6 AND (HL} c857 BIT2 A 

8y ADC A C DUAG6e+ AND {IX + d) CB50 BIT28 

BA AUC A D FUAGs°e AND (IY + dj C85! BIT20C 

88 ADC AE A7 AND A C852 BIT20 

8c ADC À H AO AND B C853 BI12€ 

8D ADC A L A1 AND C C854 BtT2H 

CE. e ADC AN A2 AND D CB55 8121 
ELA4A ADC Hi 8C A3 AND € CB5F BIT 3 1H) 
EDSA AUC HL DE A4 AND H DOCBe. 5€ BIT 3 [IX + d) 
EDSA ADC Hi Hl AS AND L FOCRe0SE BIT 3 (IT +4) 
Eu7A ADC HI. SP E6G.e ANDN C85F BIT 3 A 

86 ADD A (HL) CB46 BITO (HL) cB58 BIT38 
DD86. . ADD A.(IX + d} DDC8.,-46 BIT O. {IX + d) CB59 8110 
FD86°e ADD A.IIY + di FDCB-°46 BIT O.(IY + d) CB5A 81130 

8? ADD A. A CB47 BITO.A CBS BIT3E 

80 ADD A.8 CB40 BITO.8 CB5C BtT3H 

81 ADD A C CB41 BITO.C C850 8ITJ1 

82 ADD A. 0 CB42 BITO D CB66 BIT4 HI) 
83 ADD A E CB43 BITOE DDCB..66 BIT 4 {IX + d) 
84 ADD A H CB44 BITO n FDCB..66 BIF 4 (1Y + d) 
85 ADD A L CB45 BITO L C867 BIT 4 À 

C6es ADD AN CB4E BIT 1 (HL) CB60 BIT48 

09 ADD HL. 8C DODCB, 4€ BIT 1. (IX + d} C861 BI14 C 

19 ADD HL. DE FDCBee4E BIT 1. {1Y + dj CB62 811 4 D 

29 ADD HL.HL C84F BIT 1 A CB63 BIT4E 

39 ADD HL_ SP BC48 BIT18 C864 8114 H 
DDO9 ADD 1X BC CB849 BIT 1 C C865 BIT 4 L 
D0D19 ADO 1X. DE CB4A BIT 1 O C86€ BITS (H1) 
DD29 ADD IX. 1X CB48 BIT HE DOCBes 6€ BIT 5. (IX + d} 
DD39 ADD IX. SP CB4C BIT 1H FUCB:°6E BIT S.(IY + di 
CB6+ BITS5 À DU28 DEC 1X 71 LD (NH), C 
C868 BITS B FU28 DEC 1Y 72 LO(H1).0 
C869 BITS C 20 DEC L 73 LO (HL).E 
CB6A BITS D 38 DEC SP 74 LOtHI) H 
CB68B BITS € F3 D! 75 LO (HE) L 
CB6C 8tTs H 10. DJNZ D1S 36, LD (HI) N 
C860 BITSL F8 E! DO77,.. LO {IX + d) A 
c8?6 Bt16.(H1) F3 EX (SP) HI DD/0e.e LD HX + di. B 
DOCBs.76 BIT 6.{IIX + d) UDE 3 EX (SP). IX DD71,, LO {IX + d), C 
FDCB+e/6 BIT 6 {1Y + 1) FD6E3 EX ISPI 1Y DD72,e LD {IX +4} D 
cB?7 BIT6 A 04 EX AF AF: DD73.. LD (IX 44} E 
c870 BIT6 B EB EXUE HI DO74,. LD UX + di) H 
ce71 BIT6 C D9 ExXXx DO75,e LDUX+d) 1 
c8?2 BIT6 D 76 HAIT DU36.e5e DIX +4) N 
C8?) 8116 € ED46 IM O FDJ77,.. LO{IY +d) A 
CB74 BIT6 FUS6 IM 1. FD70., LD(IY +d) 8 
c87s 816.1 E USE 1M 2 FD? 1D(IY +4) C 
CB?F BIT 7. (#41) ED78 IN À (C) FD72., 1DUY di) D 
DUCBa7E BIT 7 (IX + d} DBee IN À IN) F073.. LD (1Y + d) € 
FOCBsefE BIT 7 (IY + di ED40 IN B (C) FD74,e LOtY +4) H 
CB?F BIT? A ED48 INC {Ci FD/5ee LD UY + di L 
CR78 BiT7 8 EUS50 IN D 1C) FD36s60e LDUIY +4) N 
c8?9 Bit? C ELUS8 NE 10) 320600 LD INN). A 
CB7A 8I17 D E D60 IN H (CI ED4%es,: LD (NN). BC 
c878 BIT7E EC68 INT, {CI EDS5%ese LD (NN). DE 
c8?7C BIT 7 H 34 INC IH1) 22,00 LD INNI HE 
C8?70 817 L DD34 INC (IX + d) DD?22,.ee LD INNI.IX 


Code Instruction Code Instruction Code Instruction 


DCeosre  CALLTC NN r4C (1Y + 6} FD22,,°: !tOD!INN) IY 
FCececse CALI M.NN k INC A ED/7%ee 1 D INN} 5P 
Désese  CALI NC NN tac: 8 OA LD À (BC) 
Clesss CALL NN INC B° 1A (D A (DF) 
Cases CA! N7. NN OC INC C 7E {D A (H1} 
Faso CALI P NN 14 INC D DD/Eee {D A (IX + d) 
ECesss  CAILPE NN 13 IMC DE FO7En LD A HY + d) 
des os CALE PO.NN 1C INC € JAeeoe 1DA 
CCoose CALL Z NN 24 INC H ?F LD A 
3F CCF 29 INC Hi 78 LD A 
BE CP (HU) 023 INC IX 19 1DA.C 
DUBEse  CPIIX + d} F023 INC 1Y 7A LDA 
FUREe…e CP (1Y + di 2C INC 78 LD A 
BF CP A 33 INC SP JC DA 
B8 CPB FDAA 140 ED57 {D A. 
B9 CPC EDBA INDR 2D LDA 
BA CP D EDA2 (NI Eee LD A 
868 CP F ED8? IR 46 (DUB 
BC CPH F9 IP (HU) DD46:e e LD B (IX + d) 
80 CPL LUDE9 JP (1x) FD46e 1DB (1v + d) 
FEse CPN FUE9 PUY) 4? LD B 
EDA9 CPD DAcese  JPC NN 40 ‘DB 
ED89 CPOR FAcose  JPM NN ai 1LBC 
EDAI CPI D2c000 IPFIC LIN 42 LD 8 
EDA1 CPI Coose  WMNN 43 108 
2F CPI C2 JPN7 NN 44 108 
27 DAA F2,00e JP P. NN 45 1086 
35 DEC (H1) FAcres IPPE NN 06. 1D8 
DU36e + DEC {IX + 4) F2 IP Pr) NN EDABoceo 1 D BC IMN) 
FDVes DEC {EY + «fl ÜAcser 15 7 WIN Olosss D BOOM 
3D DEC A 38e JR C DIS 4€ [NC O1) 
05 DEC 8 1Bee JR DIS DDA4E, LOC H1X + 
08 DEC BC 30e HNC DIS FD4F,, (DC Uv +4} 
OÙ DEC C 20° IR 7 D15 «F (OC 
15 DEC D 24e IR 7 DIS 48 IDC 
18 DEC DF 192 t D (RC) A 49 DC 
DECF 12 tO (DE) 4 AA IDC 
DEC H 17 tD{Hi) A 48 10C 
DECHE 70 tO (HI 8 [Ta 10€ 
(DC.L " DDB6,,  OR1{IX + «1) CB9F RES 3 
LODC.N FDB6,, OR (1Y + dd} CB98 RES 3 
LD D. 1HL) 87 OR A C8a99 RES J 
LD D (1Y +d) 81 ORC CB98 RES 3 
LD D.A 82 OR D CB9C RES 3 
LO D.8 83 OR E C890 RES 3 
LO D.C B4 OR H CBA6G RES 4 iHL) 
tDD.D 85 OR L DOCB,,A6 RES 4 11X + d) 


LD D € FGEse ORN FDCB..AR RES A4 IIY + 4j) 
LD D. H ED88 OTDR CBA? RES 4 A 


LOD LCL ED83 OTIR CBAO RES 4 8 
1620 LDD.N ED?9 OUT {Ci CBA! RESA4 C 
ED5B,.6: + LD DE (NN) EDa!: OUT 1C) CBA? RES 4 D 
1106600 LD DE NN ED43 OUT 1C} CBA3 RES 4 € 
SE LDE,{HL) ED51 OUT (C} CBA4 RES4 H 
DDSE,. LDE {IX + d) E 059 OUT 1C) CBAS RES 4 L 
FOSE. LDE.(IY + d) ED6! OUT !C) CBAE RES S 1HL) 
SF LDE.A ED69 OUT (Ci DOCB. AE RESS IX + «1! 
58 LDE.B D: OUT IN) FDCB..AE RESS 11Y + di 
59 LDE.C EDAB OUTD CBAF RESS A 
SA LDE O EDA3 OUTI CBAB8 RESS B 
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58 

5C 

50 

Eee 

66 
DD66, + 
FD66.° 
67 

60 

61 

62 

63 

64 

65 

26: 
ZA: .e 
25e... 
ED47 
0024 ,.0° 
DD21:6°e 
FD2Ac00e 
FD216.00 
6E 
DD6E « 
FD6Ee © 
6F 


CB1E 
DOC8,. ,1E 


LOE.E 
LDE.H 
LODEL 
LDE.N 
LD H,(HL) 


LDH,{IX + d) 
LDH.IIY +4) 


LDH, 
LDH, 
LOH. 
LDH. 
LDH, 
LDH, 
LDH, 
LDH, 
LD HL. INN) 
LD HL.NN 
LD!I.A 

LO IX, (NN) 
LDIX,.NN 
LD FY. (NN) 
LOIY.NN 
LD L.(HL) 
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LDL,(IX +d) 
LOL.({IY +4) 


LOL, 
LOL. 
LOL, 
LDL, 
LOL. 
LOL. 


LDL 
LOL, 


LD SP. (NN) 
LD SP.HL 
LO SP.IX 
LD SP.1Y 
LD SP,NN 
LDO 

LODR 

LO! 

LOIR 

NEG 


z2m ImONnœ}» 


NOP 

OR (HL) 
ALH 
ALL 
RLA 
ALC (HL) 


RLC (1X + d) 
RLC (IY + dj 


RLC A 
RLC8 
RICC 
ALCO 
ALCE 
RICH 
ALCL 
RLCA 
RLO 
RAR (HL) 
RAR (IX + d) 


F1 
C1 
D! 
ET 
DDE1 
FOE 
F5 
CS 
DS 
E5 
DOFS 
FOES 
C886 


Code Instruction Code Instruction 


POP AF 
POP BC 
POP DE 
POP HL 


POP 1X 
POP 1Y 


PUSH AF 
PUSH BC 
PUSH DE 
PUSH HL 


PUSH I 
PUSH 1! 
RES 0, 


DOCB& 86 RES 0. 
FDCB..86 RES O0. 


Cc887 
c880 
c881 
c882 
C88) 
C884 
c88s 
CB8E 


RES 0, 
RES O 
RES O, 
RES O. 
RES O. 
RES 0. 
RES 0, 
RES 1, 


D0DCB8,.8E RES 1, 
FOCB.,8E RES 1. 


CB8F 
CB88 
c889 
C88A 
C888 
c88c 
C880 
c896 


RES 1. 
RES 1, 
RES 1. 
RES 1, 
AES 1, 
RES 1, 
RES 1. 
RES 2 


DDC8.,96 RES 2. 
FDCB.,96 RES 2. 


ce9?7 
c890 
c6e91 
c892 
c893 
Cc894 
ces 
C89E 


RES 2. 
RES 2, 
RES 2. 
RES 2. 
RES 2, 
RES 2, 
RES 2. 
RES 3. 


DOCB,.9E RES 3. 
FOCB,.,. 9€ RES 3. 


SETO 8 


ceco 
ceci 
cec2 
cec] 
CcecCa 
c8ecs 
CCE 


DOC8..CE SET 
FOCS..TE SET 


CeCF 
CcBC8 
cBc9 
CBCA 
cece 
csecc 
cBco 
c806 


SETO. 
SET O. 
SETO. 
SETO. 
SETO., 
SET. 


SET 
SET 
SET 
SET 
SET 
SET 
SET 1. 
SET 2. 


à té té ot à 


x 
Y 


{HL) 
(1X + d) 


(1Y + d} 
A 


B 
C 
D 
E 
H 


L 

(HL) 
{IX + d} 
(tY + d) 
A 


8 
C 
D 
E 
H 
L 


(HL) 
{IX + d) 
(1Y + d) 


Code Instruction 
C8A9 RES SC 
CBAA RES S D 
CBAB RESS E 
CBAC RESS H 
CBAD RESS LL 
C886 RES 6. 1HL) 
DDCBe» 86 RES6.1(1X + u) 
FDCB: 86 RESG6.{Y +01} 
C88? RES 6. A 
C880 RES 6 B 
c881 RES 6.C 
C882 RES 6, D 
CB883 RES6.E 
CB84 RES6. H 
C8B5 RES6 L 
C88E RES 7 (HL) 
DDC8.,3E RES 7. 1(IX + di 
FDCBe+0BE RES 7.(IY + d) 
C8BF RES 7 A 
Cc888 RES ?,8 
c88g RES? C 
CBBA RES 7,0 
CcB88 RES? E 
CB8C RES 7H 
C8B0 RES7.L 

C9 RET 

D8 RETC 

F8 RETM 

D0 RET NC 

co RET NZ 

F0 RETP 

E8 RETPE 

EC RET PO 

c8 RETZ 

ED4D RETI 

ED45 RETN 

c816 AL (HL) 
DDCB,,.16 AL (IX + di) 
FDC8.,16 AL IIY +d) 
C8)? RL A 

cB810 RLB 

c811 RLC 

Cc812 ALD 

c813 AL E 

CBFE SET 7, (HL) 
O0C8.,FE SET ?7,{IX + d} 
FOCB. ,.FE SET 7.(IY + d} 
C8FF SET? A 
ceF8 SET 7.8 
c8F9 SET 7.C 
C8FA SET? 0 
CBFB SET? E 
C8Fc SET? H 
C8F0 SET? L 
C826 SLA (HL}) 
DD0C8..26 SLA (IX + d) 
FOCB,e 26 SLA IIY + d) 
C827 SLA A 

C820 SLA B 

CB821 SLAC 

Cc822 SLA D 














FOCBes1E 
CB1F 
C818 
CcB19 
CB1A 
CB18 
c8tc 
CB810 

1F 

CB0E 
DOCBe, DE 
FOCBee 0€ 
CBOF 
CB08 
c809 
C80A 
c80B 
c80c 
CB0D 

OF 


9F 
98 
99 
9A 
98 
gc 
90 
DE. 
ED42 
ED52 
ED62 
ED72 

37 

C8C6 
DDCB: C5 
FDCB. + C6 
cBC7 





RAR (IY + d) 
RR A 

RAR B 

ARC 

RR D 

RRE 

RRH 

RAR L 

RRA 

RAC {HL] 
RAC IIX + d} 
ARC (IY + d) 
RRC A 

RRC8 

ARC C 

ARC D 

RACE 

RRCH 

RAC L 

ARCA 

RRO 

RSTO 

RST 10H 

RST 18H 

RST 20H 

AST 28H 

RST 30H 

RST 38H 
RST 8 

SBC A. {HL) 
SBC A. {IX + dj 
SBC A,1{IY + d) 
SBC A, 
SBC A, 
SBC A. 
SBC A. 
SBC A, 
SC A, 
SBC A, 
SBC A, 


SBC HL BC 
SBC HL, DE 


SBC HL_HL 
SBC HE. SP 
SCF 

SET O {(HL} 
SET O. (1X + d} 
SET O.(IY +d) 
SET O A 
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D0C8, ,D6 
FODCB. , D6 
C80? 
C800 
CBD1 
CB802 
CB03 
CBD4 
CBD5 
CcB08 
C8DE 
DOCB,. DE 
FOCB,, DE 
C80F 
CBD9 
cB8DA 
C8D8 
CBDC 
C8D0 
CBE6 
DDC&e E6 
FOCB., E6 
CE? 
C8E0 
CBE1 
CBE2 
C8E3 
CBE4 
CBES 
CBEE 
DDC8., EE 
FOCB..EE 
CBEF 
C8E8 
CBE9 
C8EA 
CBEB 
CBEC 
CBED 
CcBF6 
DDC8.,.F6 
FOCB..F6 
CcBF7 
CB8FO 
caf! 
CBF?2 
CBF3 
CBF4 
C8F5 


SET2 
SET 2 
SET 2 
SET? 
SET 2 
SET 2 
SET 2 
SET 2 
SET 2 
SET 3 
SET 3 
SET3 
SET 3 
SET 3 
SET 3 
SET 3 
SET 3 
SET 3 
SET 3 
SETAa 
SETA4 
SET 4 
SETA 
SET A4 
SETA 
SET 4 
SETA4 
SET4 
SETA4 
SETS 
SETS 
SETS 


SET 5. 


SETS 
SETS 
SETS 
SETS 
SETS5 


SETS. 


SET 6 
SET6 
SET 6 


SET6, 
SET6. 
SET6. 
SET6. 
SET 6. 


SET6 


SET6, 


Code Instruction Code Instruction 


(IX + d} 
(IY + d) 
A 


.B 
1e 
.D 
.€ 
.H 

L 


.{HL) 
{IX + di 
{lY + d} 
A 


C 
.D 
€ 
.H 
É 

(HL) 
{IX + d) 


{Y + d) 
A 


8 
€ 
.D 
.Æ 
.H 
.L 
.{HL) 

. [IX + d) 
.(Y + d) 
A 


.8 
. € 
.D 
€ 
.N 
L 

. (HL) 


.UX + d) 
.(Y +d) 


TrIMONœPh» 


CcB23 
CB824 
CB25 
C82E 
DOCB, , 2E 
FOCB8,.2E 
c82F 
C828 
C829 
C82A 
C828 
Cc82C 
C820 
C83€ 
DDCB8,.. JE 
FOCB.° JE 
C83F 
C838 
c839 
C83A 
CB838 
c83c 
C830 

96 
DD%,: 
FD96 » » 
97 

90 

g1 

92 

93 

94 

95 

D6, + 

AE 
DDAE,e 
FDAE 
AF 

A8 

A9 

AA 

AB 

AC 

AD 

EE, ° 


Instruction 


SLA € 
SLA H 
SLAL 

SARA (HL) 
SRA {IX + d} 
SARA (I1Y + d) 
SRA A 
SRA 8 
SRA C 

SRA D 

SRA E 

SRA H 

SRA LL 

SARL {HL} 
SAL {1X + d) 
SRL {1Y + d) 
SRL A 
SALB 
SALC 

SAL D 

SARL € 
SALH 
SARL 

SUB (HU) 
SUB (1X + di 
SUB (IY + dj) 
SUB A 
SU8 8 
SUB C 

SUB D 
SU8 € 
SUB 

SUB L 
SUB N 

XOR (HL} 
XOR (IX + dj 
XOR {IY + d) 
XOR A 
XOR 3 
XOR C 
XOR D 
XOR € 
XOR H 
XORL 
XOR N 
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Annexe 2 
Complément à deux 


Un octet en complément à deux se présente ainsi : 


7 6 5 4 3 2 1 9 


SL 
Le bit 7 est le bit de signe S. 


Si le bit de signe est 9, le nombre est positif. Sa valeur est donnée par 
les bits 9 à 6. 


représente + 


Si le bit de signe est 1, le nombre est négatif. Sa valeur est calculée en 
inversant les bits 9 et 6, puis en rajoutant 1 à la valeur obtenue. 


DUT 


D. "d 


inversion bit à bit 
Leon Rene 9199111 


+0999991 


(signe) = | 
19 0 1911 50 0|=- 828 


Un octet en complément à deux peut donc décrire les nombres de 
— 128 à + 127 : 

&89 — — 128 

&FF — — 1 

&Y9 —9 

&Ÿ1 — +1 

&TE — + 127 


+ &S58. 
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Index 


A 


Accumulateur, 105. 

ADD, 116. 

adressage, 110. 

AFTER... GOSUB, 73. 
AND (assembleur), 116. 
AND (mode graphique), 21. 
ASCII, 86. 

Attaque d’une note, SI. 


B 


BIT, 116. 

BORDER, 20. 
Break, 72. 

Bruit, S0. 

Buffer de touche, 90. 


C 


CALL (assembleur), 117. 
CALL (BASIC), 106. 
Canaux d’affichage, 23. 
Canaux sonores, 46. 
Caractères de contrôle, 20. 
Caractères d’extension, 86. 
Caractères graphiques, 34. 
Carry flag, 105. 

CLG, 28. 
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CLS, 23. 

Coordonnées absolues, 30. 
Coordonnées graphiques, 12. 
Coordonnées relatives, 30. 
Coordonnées de texte, 10. 
CP, 117. 

Curseur graphique, 14. 
Curseur de texte, 12. 


D 


DEC, 117. 

DI, 75. 

DRAW, 15, 30. 
DRAWR, 30. 
Durée d’un son, 49. 


E 


EI, 76. 

END, 77. 

ENT, 54. 

ENV, 51. 

ERL, 42. 

ERR, 42. 

EVERY... GOSUB, 74. 
Extension de ROM, 95. 


F 


Fenêtre graphique, 28. 
Fenêtre de texte, 23. 
Fichier, 150. 

File d’attente, 57. 
Fondamentale, 48. 
Fréquence, 49. 
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G 


Gamme, 49. 
Générateur de signaux AY-3-8912, 45. 


H 


Harmoniques, 48. 
HIMEM, 99. 


Ï 


IN, 117. 

INC, 117. 

INK, 17. 

INKEY, 91. 

INKEY$, 91. 

INPUT, 76. 

Interruption, 72, 126. 
Interruption musicale, 61. 


J 


JP, 110. 


K 


KEY, 89. 
KEY DEF, 88. 


L 


LD, 109. 
LIST, 23. 
LOCATE, 12, 23. 
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M 


Maintien d’une note, 51. 
Masque d'interruption, 73. 
Matrice, 34. 

Mémoire écran, 9, 97. 
Mémoire utilisateur, 97. 
MEMORY, 100. 
Microprocesseur, 93. 
Mnémonique, 104. 
Mode d’affichage, 10. 
MOVE, 14, 30. 
MOVER, 30. 


O 


ON BREAK GOSUB, 75. 
ON BREAK STOP, 77. 
ON SQ (0) GOSUB, 61, 74. 
OR (assembleur), 118. 

OR (mode graphique), 21. 
ORIGIN, 14, 18. 

OUT, 118. 


P 


PAPER, 15. 
Paramètres CALL, 11, 121. 
PEN, 15. 

Période d’un son, 49. 
Pile, 97. 

Pixels, 9. 

PLOT, 13, 15, 30. 
PLOTR, 30. 

Point graphique, 12. 
POP, 117. 

PRINT, 23. 

Priorité, 73. 

PUSH, 117. 
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R 


Récursivité, 157. 
Registres, 104. 

Relaxation d’une note, 51. 
RELEASE, 47. 

REMAIN O, 77. 
Rendez-vous musicaux, 47. 
RES, 119. 

RET., 119. 

REST ART, 125. 

RLC, 119. 

RRC, 119. 


S 


SLA, 120. 

SOUND, 46. 

SPEED INK, 19. 

SPEED KEY, 85. 

SQ 0, 56, 77. 

SRL, 120. 

SUB, 120. 

SYMBOL, 36. 

SYMBOL AFTER, 35, 100. 
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TAG, 27. 
TAGOFF, 27. 
TEST, 33. 

TESTR, 33. 
Timbre musical, 48. 


V 


Vibrato, 54. 
Volume sonore, 50, 53. 
VPOS, 26. | 
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WINDOW, 24. 
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XOR (assembleur), 121. 
XOR (mode graphique), 21. 
XPOS, 33. 
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YPOS, 33. 


Z 


Z89, 93. 
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